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1 IXTIWDUCTION 


Computer  controlled  Automatic  Tost  liquipmont  (A'T:)  increases  the 
efficiency  while  reducing  the  cost  of  testing  complex  equipment.  The 
function  of  the  computer  program  which  operates  the  ATT:  is  to  validate 
the  Unit  Under  TestfLiLTl')  design,  test  point  availability  and  packaging. 
Tlie  complex  computer  prognim  logic  needed  to  specify  test  sequences 
require  the  programmer  to  have  expert  knowledge  of  the  Unit  Under  Test 
(UUT)  and  of  computer  technology  (programming) . Tlie  NOPAL  language  was 
developed  to  simplify  tlie  task  of  specifying  test  sequences  controlling 
the  ATK. 

NOPAL  is  an  acronym  for  "Nonprocedural  Operational  Performance 
Analysis  Language".  Independent  NOPAL  test  modules  each  containing  the 
logic  and  diagnostic  instructions  for  a particular  test  situation  may  be 
written  in  nonprocedural  or  random  order.  A significant  advancement  in 
NOPAL  over  other  test  specifications  languages  is  the  ability  to  auto- 
matically sequence  the  test  modules,  and  tlie  instructions  within  the  test 
modules.  This  attribute  provides  the  flexibility  to  modify  test  instruct- 
ions without  manually  reordering  other  statements  or  test  modules. 

The  report  presents  the  algorithms,  methods,  and  computer  programs 
used  to  automatically  order  the  statements  within  a test  module. 
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l.l  BACKGROLMP: 


Ntuntcnance  and  support  expense  for  complex  equipment  are  approaching 
procurement  costs  in  many  organizations.  I'or  example,  it  is  reported  that 
of  the  fifteen  and  a third  billion  dollars  sjwnt  on  electronics  by  the 
United  States  Department  of  Defense,  more  than  one  third,  or  five  and  a 
quarter  billion  dollars,  was  spent  on  nuiintenance  and  support  [Eleccion, 
1974].  It  is  estimated  that  80^  of  this  cost  is  attributed  to  labor,  with 
85?  of  the  tinw  s^ient  on  diagnosis  and  fault  isolation.  Fiscal  savings  can 
be  achieved  by  utilizing  engineering  technicians  with  Automatic  Test  Systems 
(AT.S).  This  iTuiy  be  contrasted  to  tlie  present  nuinual  procedures  employed 
by  elcctical  engineers  to  determine  optimal  tost  sequences. 

Tlie  probable  savings  can  be  calculated  by  comparing  the  beginning 
salary  of  engineers  and  engineering  teclinicians  as  reported  by  the  United 
States  Department  of  Labor  Statistics  [U. S.  BLS,  19/5)].  In  1974, 
beginning  engineers  received  .513, 171  jxjr  year  as  contrasted  to  the  engineer- 
ing technician's  $7,975  per  year,  a difference  of  forty  percent.  Based 
on  the  maintenance  and  support  figures  given  above,  the  estimated  savings 
might  be  one  and  a half  billion  dollars,  assuming  there  is  a one-to-one 
substitution  ratio  between  the  engineering  technicians  and  the  electrical 
engineers.  The  savings  would  enable  electrical  engineers  to  utilize  their 
talents  more  productively. 

To  achieve  fiscal  economy  and  enhanced  reliability  as  a result  of 
effective  testing,  tlic  United  .States  Army  developed  a special  purpose 
language,  OPAI.  (Oiierational  Pcrfonmmcc  Analysis  Language)  [Fnmkford 
Arsenal,  1976]  to  mechanize  the  prognimming  of  ATS.  The  design  is  general 
enough  to  test  a broad  nuige  of  equipment  including  electronic,  nK'chiUUcal , 
hydraulic,  and  optical.  Its  opcnition  is  similar  to  the  wll  knoun 


computer  lan^uine,  HASK!,  in  rh.it  each  line  hc>;ins  with  a kcy.vord  such 
as  Dl'.ClAi^i,  QTIX'),  C/M.L,  etc.  OI’Al.'s  most  significant  improvement  over 
earlier  test  programminj;  liuip.iapc's  such  as  ATIAS  [ARINC,  1972]  is  its 
facility  for  modilar  development  of  test  modules,  allowinp  independent 
test  developmi'nt  by  diffeix'iit  proi’nimnuny,  teams. 

Use  of  OPAl,  as  a proyramminti  lanj:uaj:e  requires  considerable  pro- 
Rramminy  labor.  For  exirniiile,  the  exact  execution  sequence  of  instructions 
within  each  tost  module  aiid  the  overall  ordering  of  test  modules  must 
be  specified.  This  is  done  with  the  conventional  COTO  and  CALL  state- 
iiKMits.  A high  likelihood  of  error  is  present  when  manually  implementing 
the  favilt  determination  stratog)-.  Tliis  is  a result  of  the  extensive 
knowledge  needed  in  computer  programming,  applied  mathematics,  ;u\d  the 
comwnent  being  tested.  lengthy  sequencing  instnictions 
coniiined  with  required  storage  assigitments,  produce  multiple  coding  steps 
for  all  test  specifications.  In  order  to  simjilify  the  process  of 
progr.imming  the  ATS,  a non-iirocedural  test  specification  language  was 
developed  at  the  Ihiiversity  of  Pennsylv;mia  in  the  Moore  .School  of 
F.lectrical  Lngincering,  IViiartment  of  Computer  ;ind  Infoniuit ion  .Sciences 
[Ore,  197bl. 

N'OPAL  - .m  acroiniii  for  Nonprocedural  Oix'rat ional  Perfomance 


.Analysis  Lmguige  pennits  the  user  to  specify  test  specifications  in 
mLtdular  fashion,  indeixaident  of  one  ;uiothcr.  The  actual  sequence  of 
e.xecution  is  determined  automatically  by  the  NtAPAL  processor.  Since 
the  .'Sequencing  is  perfonned  autoimitically , all  C<CTO's  and  subroutine 
call's  have  been  eliminated.  Ihe  name  N’OPA.  was  selected  because  it 
is  the  name  of  a cactaceous  pl;uit  which  illustrates  .an  incremental 
growth  of  stems  suralogous  to  the  modvilar  dcvelopiixnrt  of  tests  in  NtiPAL. 


Uhlikc  OP/M-,  NOP/\L  is  not  a programming;  language.  Rather,  it  is 
a language  for  describing  individual  tests  and  diagnoses  whidi  are  used 
as  input  to  the  NOPAL  processor,  nie  Ol’AL  processor  then  produces  a 
computer  program  for  conducting  these  tests  in  conjunction  with 
Automatic  Tost  Equipment  (ATLj . F'igure  1.1  illustrates  this  relationship. 

nopal's  non -procedural ness  also  allows  for  incremental ity  in  the 
sense  that  additions  or  modifications  to  test  specifications  may  be 
incorjxjrated  easily.  For  example,  when  tests  are  added  because  of  design 
modifications,  the  user  need  not  construct  alteniative  sequencing  as 
in  OPAl,.  The  autonvitic  ability  to  sequence  enables  NOPAL  to  achieve  a 
degree  of  sophistication  that  will  reduce  the  cost  of  updating  and 
creating  the  program  for  the  ATS. 

/Xnother  improvement  incoiqwrated  in  NOPAL  is  its  ability  to  auto- 
matically allocate  storage  assignments  for  single  ;uid  subscript  variables. 
These  assignments  indicate  whether  a variable  is  locally  defined  to  a 
particular  test  module  or  globally  defined  to  all  test  modules.  The 
attribute,  whether  local  or  global,  is  stated  in  several  user  rejxjrts. 

1.2  nil-:  .NOi’AL  prcx:fsS(.ir 

The  NOPAL  processor  is  graphically  represented  in  Figure  1.2.  ITie 
monitor,  located  at  tlie  top  of  this  diagram,  is  the  control  mechanism 
of  the  system  involving  the  procedures  below  it.  These  procedures, 
titled  "s)aitax  juialysis,"  "intra-test  iuialysis,"  and  "inter- test 
cuialysis,"  form  the  three  basic  divisions  of  the  processor. 

Syntax  ;uialysis,  drawn  on  the  far  left  jxirtion  of  Figure  1.2, 
refers  to  the  process  of  parsing  NOI’AL  souive  strings  into  s>ntactic 
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classes,  and  storing  them  in  an  as soc i a t i vc  memo r\' . This  special  purpose 

moinoiy  network  stores  the  string’s  so  that  they  are  "associated"  by  their 
content,  ;md  can  he  retrievetleasily  during  later  stages  of  processing. 

User  ro[X)rts  including  a source  listing,  a cross  reference  report,  and 
.'in  error  rci^rt  arc  jiroduced  during  this  phase. 

Intra-test  analysis  is  represented  in  tlic  center  of  Pigurc  1.2 
part  itioned  by  tlie  broken  rect;mglo.  Its  putyosc  is  to  evaluate 
expressions  within  each  test  module  to  detennino  automatically  their 
sequence  of  execution.  Ihe  pn)ccss  begins  by  establishing  an  adj acency 
nvitrix,  for  every  NOl'Al,  test  module,  bach  position  of  the  adjacency 
nvitrix  represents  a variable  luuiie , a diagnosis , or  a conjunction  or 
assertion.  Relations  are  represented  on  the  matrix  such  that  source  .and 
target  variables  arc  linked  to  conjunction  .and  assertions,  or  operator 
R'sponsc  and  other  paraiiK'ter  variables  arc  linked  to  diagnoses.  A path 
nut  fix  is  later  introduced  to  detect  circular  definitions  by  indicating 
the  existence  of  all  patits  within  the  NOI’AI,  test  module.  If  the  NOPAL 
test  nxidule  is  error  free,  sequencing  is  iiorformed  using  prcccdence-and- 
ranking-. algorithms  based  on  gr.apli  tlieory.  Rcjxjrts  listing  the  sequenced 
NOPAL  statements  and  the  ilctected  errors  are  generated. 

Inter- test  ;uialysis,  drawTi  on  the  riglit  portion  of  Figure  1.2,  refers 
to  the  process  of  .autoimit  ical  ly  determining  the  onlcr  of  execution  for 
.all  test  iiKxlules.  .Six  scqix'ncing  strategics  are  coml>ined  with  precedence 
relationsliip  niles  to  form  a directed  graph,  represented  as  a p recedence 
nvitrix.  ii.ach  ixisition  of  the  |irocedcnce  matrix  represents  a variable 
name,  iliagnosis,  or  test  module.  Tlie  row  .-md  column  comliinations 
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denote  a precedence  relationship.  Based  on  the  matrix,  it  can  be  deter- 
mined whether  the  test  specifications  are  complete,  consistent  and/or 
unanfciguous.  Also,  possible  cycles  are  detected  and  eliminated  appro- 
priately. Finally,  test  modules  are  assigned  execution  levels  and 
ordered  in  proper  execution  sequence.  A detailed  report  explaining  this 
process  is  currently  in  progress. 

1.3  Organiz.ation  of  the  Report 

Section  2 introduces  the  tyiies  of  NOPAL  statements.  Following  this, 
the  sections  parallel  the  process  of  intra-test  sequencing  illustrated 
in  the  center  portion  of  Figure  1.2. 

In  Section  3,  the  algorithms  which  transform  NOPAL  statements  into 
matrix  form  arc  described.  Preliminary  analysis  of  ambiguity  is  in 
.Section  4.  The  path  matrix  that  detects  circular  or  transitive  relations 
is  presented  in  Section  5.  Finally,  Section  6 details  the  precedence 
algorithm  that  orders  NOPAL  statements. 


OVERVIl-W  OF  NOPAL  S'l’An-J^nXl’  TYPliS 


NOi’AI,  statements  concisely  express  test  situitions  wliose  sequencing 
is  discussed  in  this  rcixirt.  lliis  section  presents  ;ui  ovendew  of  the 
Umguage  to  familiarize  the  reader  witli  its  construction.  To  actually 
write  a test  nxidule,  the  NOPAl,  l,anguago  Ntinual  should  be  u.sed  . 

llie  overall  stnicture  of  tlie  NOPAL  language  is  sinnmarized  in 
Figure  2.1,  using  an  extended  BNF  notation.  As  siioun  at  the  top  line, 
a six'ci fication  in  NOPAL  has  three  parts:  Test,  Unit  Under  Test  (Uirn  , 
and  ATI;,  llie  latter  two  arc  intended  to  provide  UIH’  ;md  A'lT  independence, 
in  the  sense  tliat  ch;uiges  are  reflected  only  in  the  corresponding  parts 
of  the  specification.  Consistent  with  the  theme  of  this  rejxart,  the 
discussion  centers  annuid  the  format  of  the  NOPAL  test  specifications 
written  in  indeix'ndent  test  modules. 

A test  module  describes  a single  test  to  diagnose  a variety  of 
failure  modes.  Because  the  nuxlules  are  independent  of  each  other,  they 
iiviy  be  modified,  deleted,  or  inserted  without  affecting  other  test 
situations.  Formally,  a test  module  is  a comjtositc  of  four  imique 
classes:  stimuli,  nK'asureniMit , logic,  and  dia^tosis. 

'Hie  Stimujl_^  class  indicates  the  actions  applied  to  tlie  Uiri  at 

~ !' 

test  timoj  wiiile  the  Mi'aMiremi'ivts  cl.iss  exiiresses  what  actions  are  j 

needed  to  ascertain  tlie  .success  or  failure  of  tlie  test.  Both  stimuli  ' 

and  measurement  employ  conjiuiction  .uui  assertion  statements.  A 
^qiijmction  indicates  a function  applied  or  iiK'.isiired  to  a specific 
connector  point  of  the  Ulff.  An  Assertion  may  be  u.sed  for  two  puiqxi.scs. 

The  primary  one  is  for  stating  tiie  range  of  measurements  wliich  would 
detennine  the  success  or  failure  of  a test,  llie  otlier  use  is  to 
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< NOPAI.  Sl'IiCI  FI  CATKIN  > ::=  < TIiST  SPl-CIFICATION  > < Uin-  SPHCI  PI  CATKIN  > 

< AI'i:  SI’ECIFICATICN  > ' 

< TEST  SPECIFICATION  > ::=  < TEST  MODULE  > f < TEST  MODULE  > 

< TEST  MODULE  > = [ < STIMULI  > ] [ < NHIASUKEMENT  > ] 

[<  LOGIC  >]*  [ < DIAGNOSIS  > ]* 

< STINttH,!  > [<  CONJUNCTION  > ] [<  ASSERTION  > ]* 

< ME/VSURF>1ENT  > : :=  [ < CONJUNCT  I W > ] [ < ASSERTION  > ]* 

< OON.IIINCTION  > ::=  < TEST  PO I MI’S  ><  RELATION  ><  WAVEFORM  > 

[ < TEST  POINTS  > < RELATION  > < WAVEFORM  >]* 

< ASSERTION  > ::=  [IT  CIAUSE  niliNj 

< /\Rnil_EXPR  > < Rl-.LATION  > < ARmiJiXPR  > 

[ELSE  <ARrm_EXPR  ><  RELATION  ><  ARITU_EXPR  >] 

< LOGIC  > ::=  < OPERAIDR  > < DIAGNOSIS  ID  > 

< DIAC'J^OSIS  > ::=  < DIAGNOSIS  ID  > < MESSAGE  > [ < FAILURE  IDS  > ] 

[ < OTHER  DATA  > ] [ < TIMING  > ] 1 

1 

[ < OPERATOR  RESPONSES  > 1 
Key:  [<-w]  OPTIONAL 

[<--]*  MAY  RIJ’EAT  ZF.RO  OR  ^K)RI•  TIMl-S 


FIGURE  2. 1 TOP  LE\n:L  STRUCTURE:  OF  THE  NOPAL  L/WaiAGE 
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stoit'  iLtt.i  x.ilin's  .iMvi  pi' no  fill  lOinpiit  at  ion  diiriii)’  execution  of  the 
test  in.c  proi  oss. 

Iho  sand'll'  tost  iixnlulo  (I'lj^ure  2.2)  ilemon.st rates  the  use  of 
stimuli,  iii'asuivnx'nt . lojiic,  ;uul  diaj^nosis  to  ex]3ress  a test  situation, 
nie  only  stimuli  is  conuuiction  $.S_lvOO()l  which  applies  fiuiction 
”ilONS'r_S''  to  connector  pins  ".J24JV'  .md  ''(MIV.  To  measure  the  result 
of  $.S_1V0001 , measurerrnt  conjiuict  ion  $M_W0001  applies  fimction  "S1N1',__D'' 
to  connector  pins  ”,122"  ;uid  "tlNO’’.  Tinally  measinvnient  assertion 
$M_W0002  evaluites  the  results  to  determine  tlic  success  or  failurc 
of  tile  test. 

Coni  mictions  and  assertions  employ  two  classes  of  variables; 

Source  .md  target.  .Source  variiibles  are  generated  elsewhere,  in  other 
assertions  or  con  jiuict ions.  TARQiT  variables  are  locally  evaluated  to 
be  used  elsewhere.  .Source  variables  may  be  considered  dcix'ndent  or 
exogenous;  while  target  variables  iiviy  be  considered  i idepcndent  or 
endogenous.  Within  the  sanijile  test  module  (1-igurc  2.2),  conjimction 
$M  WOOdl  defines  "I'l"  ;md  "Vi”  as  target  variables,  tmd  "VARl"  as  a ,, 

.source  variable.  /Vssertion  $Mjron02  defines  "VARl"  "PI" as  souive  i 

variables,  lissentially  a variable  defined  both  as  source  and  target  ; 

by  different  conJiuict ions  ;uid  as.sertions  cau.ses  the  conjunction  or  i 

assertion  which  uses  the  variable  as  target  to  autonvitical ly  precede  I 

the  conjimction  or  assertion  that  employs  it  as  source.  I 

1-acli  d i a gnos i s identifies  the  faiUnx''s  and  the  message  which  commimi- 
cates  the  re.sults  of  testing  to  the  operator.  A diagnosis  statement  is 
comixised  of  five  parts:  affected  components , other  paraiiK^ters , message 
t>qie,  tjmiiiji,  and  o{XM'ator  response . Affected  components  is  a list  of 
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TEJir  SYTliSrOOOS; 


STIMULI  2(SYn-;ST0003)  ; 

CONJUNCTION  $S_W0001(2) : 

( <J24_B  > (M)  = CONCT_S(27.S  VOLT  )); 

MIV\SURENn-NT  $M_SYTILST000(SYri-CT0003)  ; 

CONJUNCTION  $M  W000U$M  SYTLSTODO')  : 

[ :i22rcM)  = SINl-_D(\1  VOLT,  FI  HZ,  VARl  SEC  )) 
TARGIiT:  FI,  VI 

j-  souRQ-;:  VAmT' 

k ASSERTION  $MJV0OO2($M_SYTESTOOO) : 


IF  VAR1=60  Tin-:! 

FI  = S*lE+06  +-  60 

ELSE 

FI  = 5*lE+06  +-  2.5 
SaiRCE:  VARl,  FI; 

IDGIC  SLOGICOOIOCSYTESTOOSI : *4,  5,  *6; 

DIAGNOSIS  4: 

TYPE=#5. 

TIME=  O.OOOOOE+OOSEC, 

RESPONSE=(Vmj  ; 

DIAGNOSIS  5: 

OI’ERATOR  MlLSSAa-.: 

AFFECTED  COND’ONECTS* TO-Q  TOL(STD  5M1Z  FRE) , 
OTI  lER  PARA^^iTERS=  ( ' FREO' ) , “ ~ 

TYPE=#6; 


DIAGNOSIS  6: 

^^•;ssAQ•;: 

CTTffiR  PARA^^^’ERS=(F1, 
TYPE=D; 


’HZ'), 


i 

1 


? 


I 

i 

I 

■i 


FIGURE  2.2  ■ SAMl’I,}',  TEST  MUXILE 
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fnilure  functions  indicatinv;  tlic  inc)clcs  of  failure  and  corresponding; 
components  whicli  the  diagnosis  asserts  to  have  failed.  Other  parameters 
indicates  the  variables  or  ciiaractcr  strings  that  are  included  in  the 
diagnostic  message.  The  diagnostic  message  is  referred  to  by  the 
label  in  the  message  tn^e.  Timing  states  when  the  operator  message  is 
to  be  sent  in  respect  to  the  bcgiiuiing  of  the  application  of  the  stimuli. 
If  the  message  contains  instnictions  to  the  operator  to  perform  duties 
such  as  pressing  keys,  reading  meters,  or  making  measurenents,  an 
operator  Response  may  be  necessaiy  in  order  to  conclude  the  tests.  Hie 
possible  resixinses  consist  of  suspending  or  initiating  a test  or 
inputting  to  the  terminal  the  values  of  tlie  requested  variables. 

(■)lx^rator  response  and  other  parameters  qualify  the  diagnostic 
message.  Figuiv  2.2  presents  three  diagnoses.  Diagnosis  4 uses  VARl 
to  stoiT  the  operator  response  for  latter  examination.  Diagnosis  5 
emiiloys  the  character  string  'I'llEQ'  as  an  other  parameter.  Diagnosis  6 
uses  variables  FI  ;uid  cliaracter  string  MiZ’  as  an  other  panimeter. 

Hie  next  section  discusses  how  the  information  necessary  for 
sequencing  is  constructed  from  the  test  module  and  represented  in  a 
mitrix  equivalent  fonii. 
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3.  AIUACE-NCY  MATRIX 


This  phase  of  the  NOl’AL  processor  deals  with  tJie  transformation 
of  NOPAI.  test  specifications  by  the  use  of  graphs  and  matrices.  It 
describes  an  application  of  graph  theory  to  the  analysis  of  NOPAL 
specifications  and  to  the  generation  of  a sequenced  test  module.  UTiile 
graph  theory’  has  been  used  in  various  computer  applications  in  recent 
years  the  analysis  of  information  relationships  and  the  automatic 
sequencing  by  me.'ins  of  graph  arc  novel.  This  section  presents  the 
background  and  terminology  involved,  as  well  as  describing  the  graplis, 
matrices,  and  other  data  stnjctures  that  are  built  from  a NOPAL 
specification  test  module  for  intra-test  sequencing. 

Section  3.1  provides  an  overview  of  the  processes  involved  in 
this  stage,  and  Section  3.2  discusses  them  in  greater  detail. 

3.1  LLBENTARY  STRUClURIiS  OF  TIIF.  APJACLNCY  MATRIX 

This  section  discusses  a matrix  representation  of  the  test  sixjcif- 
cations  introduced  in  Section  2.  Of  these  specifications,  the  pre- 
cedence indicator  controlling  sequencing  is  based  on  source  iind  target 
variables.  For  example,  a source  variable  to  an  assertion  must  be 
available  before  invoking  the  assertion.  A target  variable  to  an 
assertion  is  only  available  after  the  assertion  is  comjiutcd.  Tliis 
requirement  detailing  precedence  information  is  imjilied  in  a "directed 
grapli". 

^^‘I'ccted  graph  is  a network  of  interconnected  nodes  such  that  , 

i 

each  node  is  a conjunction,  assertion,  di.ignosis,  or  variable.  F'oniully.  | 

i 

a directed  graph  is  a pair  (N.A)  sucli  that  N represents  thu  set  of  nodes  .j 

in  tlie  test  module;  and  A represents  the  set  of  ordered  pairs  (Nj , NkJ . 


I-,ach  Ai  is  illustrated  witli  an  arrow  indicating  a path  from  node  N'i 


to  node  Nk.  liach  node  nuiv  have  multiple  arrows  envinatinp  from  it.  Because 
the  arrows  have  ;in  associated  diivction  tlie  jjrapli  is  sometimes  called  a 
di^craph. 

'flio  sample  test  module  of  figure  2.2  is  represented  as  a directed 
graph  in  I'igurc  3.1.  liach  conjunction,  assertion,  diagnosis,  <'md  variable 
corresix)nds  to  one  node.  Variables  repeated  by  different  conjunctions, 
assertions,  or  diagnoses;  or  used  as  both  source  iutd  target,  are  still 
represented  with  one  node.  Nodes  that  are  not  related,  are  not  connected. 

Tiie  nodes  of  the  digraph  correspond  to  locations  within  a dictionary, 
ilie  dictionary  is  defined  as  an  array  of  strings  which  are  the  names  of  the 
conjunctions,  assertions,  diagnoses,  and  variables  in  tlie  test  module.  This 
structure  stores  the  digraph  node  labels  and  is  used  to  form  the  roAvs  cuid 
columns  of  the  adjacency  matrix.  It  is  formed  by  grouping  conjunctions 

and  assertions,  diagnoses  and  variables. 

Figure  5.2  shows  the  construction  of  the  dictionar>'  for  the  sample 
test  module  in  Figxire  2.2.  Tlie  dictionar)'  has  nine  labels  prearranged  begin- 
ning with  conjiuictions  and  assertions  followed  by  diagnoses  ;uid  variables. 

.•U though  tlie  directed  graph  is  more  comprehensible  for  humans,  it's 
counterjiart , the  adjacency  matrix,  is  an  equivalent  form  better  suited 
for  digital  computation.  Fonnally  the  adjacency  matrix (A)  corresponds 
to  the  digraph  (N,R)  of  N nodes  with  one  relation  R defined  as  an  N x N 
matrix  (i.e.  a irvitrix  having  an  C(iual  numlier  of  rows  and  coluimis).  llie 
relation  is  expressed  below  with  a "1"  in  Aij  indicating  a path  from  node 
i to  node  j ; 

.Aij  = 1 if  (Nj  ,.Nk)  is  in  R;  F.LSF 
Aij  = 0 
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DIRECTED  GRAPH  OF  SAMPU;  TEST  NDDin>;  IN  FIGURE  2.2 
FIGURE  3.1 


DICTIONARY  OF  NOni',  IN  im:  DIRECn'ED  GRAPH 
IN  FlGURIi  3.1 


ITGURi:  3.2 


T}ic  adjacency  matrix  for  the  saniiile  test  module  of  Figure  2.2 
is  shown  in  Figure  5.3.  It  is  equivalent  to  the  directed  graph  in 
Figure  3.1.  such  tluit  relations  between  nodes  arc  prescrv'cd.  For  cxam|5le, 
the  "1"  in  row  2 column  8 indicates  a directed  path  from  node  2 to  node  8. 
Thus,  referring  to  the  dictionazy.  tlic  path  is  fi'om  the  conjunction 
SMJVOOOl  to  the  target  variable  i'l.  'llie  next  sectioiz  details  the  algorithms 
used  to  indicate  patlis  between  nodes  in  the  adjacency  matrix. 


ADJACENCY  M\TRIX 

STATEMFAT  TiTE 

DICTIONARY 

1 

2 

5 

4 

5 

6 

7 

8 

9 

CONJUNCTION 

1 

$S  WOOOl 

0 

1 

0 

0 

0 

0 

0 

0 

0 

CONJUNCTION 

7 

$M  WOOOl 

0 

0 

0 

0 

0 

0 

0 

1 

1 

ASSERTION 

3 

$M  W0002 

0 

0 

0 

0 

0 

0 

0 

0 

0 

DIAGNOSES 

4 

4 

0 

0 

0 

0 

0 

0 

1 

0 

0 

DIAGNOSES 

5 

5 

0 

0 

0 

0 

0 

0 

0 

0 

0 

DIAGNOSES 

6 

6 

0 

0 

0 

0 

0 

0 

0 

0 

0 

VARIABLE 

7 

VARl 

0 

1 

1 

0 

0 

0 

0 

0 

0 

V/\RIABLE 

8 

FI 

0 

0 

1 

0 

0 

1 

0 

0 

0 

VARLXBLE 

9 

VI 

0 

0 

0 

0 

0 

0 

0 

0 

0 

FIGURE  3.3  COMSTRUCriNG  HIE  DICTIONARY  AND 
TORMING  THE  ADJACENCf  MATRIX 
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3.2  F.XrRr.SSINC  PRlia-rOCH  RlilArU^’S  in  matrix  form 

lliis  scctiai  explains  the  la'clKinisin  of  linkinj;  variables  in  matrix 
form  to  specify  the  precedence  of  execution. 

Conjunctions  ;ind  assertions  employ  source  and  target  variables  to 
help  specify  logical  or  arithmetic  ix'lat ionships.  A target  variable  is 
expressed  within  the  adjacency  laitrix  by  placing  a "I"  at  the  intersection 
of  the  coni  miction  or  assertion  row  ;uid  tlie  target  variable  column.  A 
source  variable  is  the  inverse  of  the  target  representation  expressed  by 
placing  a "t"  at  the  intersection  of  the  source  variable  row  and  the 
conjunction  or  assertion  colmmi.  Hiis  inverse  rcpi'csentation  guanuitces 
precedence  of  target  relations  before  source  relations.  Figure  3.4 
summarizes  the  process  of  indicating  the  above  relations. 


MATRIX 

RGV 

coi.iixr^ 

VALGi 

T/\RGET; 

ADdAG-Na 

ccN.njNcrioN 

OR 

ASSF.RTlON 

TARGET  VARIARI.E 

1 B1N/\RY 

SOURGi. 

AniACUNtT 

SOlIRG- 

V.ARI.'ABLF 

CONJUNCriON 

OR 

ASSF.RTlON 

1 B1N/\RY 

FICURF.  3.4  TARQ-f  ANP  StXlRCi;  Sll^^l^RY 
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I-ii^uro  3.S  is  an  adjacency'  iiiitrix  fonned  from  information  in 
I'iyjnro  2.2.  It  illustrates  using  mnenunics  to  show  c.\])l  icitly  the 


source  and  target  linkage. 

Ihe  first  entry’  in  the  dictionaiy  is  conjunction  $s  IVOOOl. 

Miitri.x  entries  are  not  required  because  tlic  conjiuiction  does  not  employ- 
source  or  target  variables.  The  second  entry  is  conjunction  $M_W0001 
vdiich  employs  two  target  variables,  I'l  and  \T  ; and  one  source  variable, 

V';\R1.  Ihe  target  I'clations  arc  entered  in  the  second  row  of  the  adjacency 
nvJtrix  witJi  "1”  in  the  eiglith  ;uid  ninth  columis.  Tlie  source  relations 
arc  entered  with  a "1"  in  the  second  colimin  of  the  seventh  row.  yiie  third 
entiy,  assert  ion  $M_W0002  , uses  two  soiuve  variables  V;\R1  and  FI  wliicli  are 
entered  in  the  third  cohum  of  rows  seven  and  eight. 


DICTIONvMlY  AIXJACFjNCY  M/\TRIX 

12  3 4 5 0 7 8 9 


1 S.S  WOOOl 

2 SNHVOOOI 

3 5M_W0002 

4 4 

5 5 
0 0 

" '’.ARl 

8 IT 

9 VI 


OBOOOOOOn 
0 0 0 0 0 0 0 T T 
0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 R 0 0 
0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 
0 S S 0 0 0 0 0 0 
0 0 .S  0 0 P 0 0 0 
0 0 0 0 0 0 0 0 0 


m O' 
c/i 

I -OH 


o o o 
o o o 
o o o 

>->  >-•  (v> 


S - SOURCE 
T - TARCET 

R - 0PER/\1X)R  RESPON'SE 

P - OTHER  PAR/\fETERS 
B - STr^iILI  CON’JllNCriON 
EXECUTED  BEFORE 
MEASUREMENT 
00N.JUNCTI0N 


Fianili  5.5  AIVIACIMT  MATRIX  mR^^■;D  1-ROM  TEST  ^D1)UI,^;  IN 

FI CURE  7.1 
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Variables  used  within  diagnoses  are  I'ciiresented  in  a similar  fonn 
to  the  source  and  target  varialiles.  /\n  operator  resixinse 
variable  is  expressed  by  placing  a "1"  at  the  intersection  of  the 
diagnosis  row  and  variable  coUuici.  llie  other  parameters  variable  is 
expressed  by  placing  a "1"  at  tlic  intersection  of  the  variable  row  and 
diagnosis  colimui.  Tlie  inverse  representation  guarantees  precedence  of 
oix;rator  restwnses  before  otner  panu'K*ters.  Literal  strings  that  are 
enclosed  by  a|X)Strophcs  (e.g.  MIZ')  have  no  significance  in  the  logical 
ordering  of  statements  thus  tliey  are  not  represented  in  either  the 
dictionar>'  or  the  adjacency  matrix.  Figure  .3.6  sumiiurizes  the  method 
used  to  indicate  variable  attributes  to  diagnosis. 

MATRIX  ROW  CPLUMN  VALIR- 

OPl-R/\TOR  RF.SRONSF.:  AlDACllNTT  DIAC^’OSIS  VARbVRlJ:  1 BINARY 

ann;R  i\\iwQm;RS:  ariaginct  variable  niACN'osis  i binary 

FiaiRE  3.6  DIAGNOSIS  AND  VAIRVBLE  SUNMARY 
Figure  3.5  also  shows  operator  response  and  other  matrix  entries 
constructed  from  the  sanijile  specifications  in  ITgure  2.2.  Nkiemonics  are 
used  to  exiilicitly  differentiate  tliese  relations  from  the  previous  source 
;md  target  structures.  For  exiimple,  Diagnosis  4,  which  oinjiloys  the 
variable  VARI  as  an  operator  resiionse,  is  expresse-.  in  the  seventh  column 
of  the  fourth  row.  In  Diagnoses  5 the  other  parameters,  'FREQ'  is  a 
litoral  string  (denoted  by  a character  string  enclosed  within  apostroplics) 
ratlier  th;ui  a variable.  .Rince  the  adjacency  iiuitrix  only  links  variables, 
'FREQ'  is  not  indicated  on  the  s^unplc  iiutrix.  Similarly,  the  literal 
string  'HZ'  of  Diagnosis  6 is  not  present  in  the  adjanccncy  nntrix. 
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However,  other  panunctcr  variable  11  of  Diagnosis  6 is  represented  in 
the  sixth  column  of  the  eighth  row. 

The  path  relations  introduced  thus  far  directly  parallel  the  wave- 
forms and  diagnosis  statements.  Because  NOPAL  is  non-procedural,  an 
additional  relation  is  necessary  to  insure  that  stimuli  conjunctions  pre- 
cede measurement  conjuictions.  Thus  the  functi  which  excite  the 
UUT  through  specified  terminals  precede  the  functions  \diich  classify 
UUT's  responses.  This  is  achieved  simply  by  inserting  a "1"  in  the 
measurement  conjunction  column  of  the  stimuli  conjunction  row.  Thus  in 
the  sample  test  module  of  Figure  2.2,  a "1"  is  entered  in  the  second 
column  of  the  first  row,  linking  $S_W0001  to  $M_W0001. 

Tlie  process  of  constructing  the  adjacency  matrix  is  summarized  in 
the  algorithm  of  Figure  3.7  Tlie  last  step  of  this  process  evaluates  the 
external  variable  'SFQOPT' {initially  set  when  invoking  the  NOPAL  system) 
to  ascertain  whether  to  generate  a special  purpose  Adjacency  Matrix  Report. 
This  report  (Figure  3.8)  indicates  relations,  node  labels,  and  node 
attributes  of  the  sample  test  module  in  Figure  2.1.  It  summarizes  in  short 
form  the  necessary  information  employed  in  intra-test  sequencing. 

Preliminary  error  analysis  is  performed  as  soon  as  the  above  infor- 
mation is  accumulated  in  the  adjacency  matrix.  Tliis  analysis  detects 
multiply  defined  target  variables  is  discussed  in  Section  4.  Section  5 
develops  a nore  sophisticated  algorithm  to  detect  circular  ambiguities. 

As  tlie  reader  proeedes  through  the  following  sections,  the  jv)wer  and 
.sopliistication  of  representing  test  .s]ieci  fi  cat  ions  in  matrix  form  will 
become  evident. 
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ALOORITltM  TO  CREATL-  AN  ADJACKNCY  MATRIX 

LET  #W  = NU^BER  OP  CONJUNCTIONS  AND  ASSERTIONS  IN  ADJACENCY  MATRIX 
LET  Ap  = NUMBER  OF  DIAGNOSES  ON  ADJACENCY  MATRIX 
LET  #V  = NUMIER  OF  V/JIIABLES  IN  ADJACENCY  MATRIX 

LET  N = TOTAL  NUMBER  OF  CONJUNCTIOJS,  ASSERTICNS,  DIAGNOSES  VARIABLES 
LET  DICTIONARY(N)  = LIST  OF  CONJUNCTICN,  ASSERTION,  DIAGNOSIS,  AND 
VARIABLE  L/\BELS.  (SIZE  DETEWIINED  BY  N) . 

LET  ADJACENCY  MATRIX(N,N)  = MATRIX  SUai  THAT  EAQI  POSITION  'X'  CORRESPONDS 
TO  THE  LABEL  IN  POSITION  'X'  OF  'll  IE  DICTIONARY. 

1.  GATHER,  THEN  GROUP  ALL  CONJUNCTIONS,  ASSERTIONS,  DIAGNOSES,  AND 
VARIABLES  INTO  DICTIONARY 

2.  COUNT  AND  SET  #W,  #D,  #V  AS  NECESSARY 

3.  CALCULATE  SIZE  OF  THE  AaiACENCY  MATRIX 
N = #W  + #D  + #V 

4.  ALLOCATE  ADJACENCY  MATRIX  A(N,N) 

5.  SET  ADJACENCY  MATRIX  TO  'O' 

6.  PERFORM  7-9  FOR  FACH  CONJUNCTION  AND  ASSERTION 

7.  FOR  EAQI  VARIABIJ.  PERFORM  8-9 

8.  IF  SOURCE  VARIABLE  IIIEN: 

ADJACENCY  MATRIX( VARIABLE  ROW,  CONJUNCTION  OR  ASSERTION  COLUMN)  =1 

9.  IF  TARGET  VARIABLE  THEN: 

ADJACENCY  MATRI XCCONJINCTICN  OR  ASSERTION  lOtf,  VARIABLE  OOLU^^I)  =1 

10.  PEiRFORM  11-12  E'OR  EAQI  DIAGNOSIS  («!)) 

11.  FOR  FAQI  DIAGNOSIS  VARIABLE  I’ERFORM  STEP  12-13 

FIGURE  3-7  ALGORiniM  TO  CREAITE  ADJAa-NCY  MATRIX 
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12.  IF  OPlill/VrOR  W;SPONSE  VAKlAlUJi  IN  DIAcmSIS  ITfllN: 

AaiAQiNCl'  MATRIX  (DIACiMOSIS  NODE,  VARIABLE  NODE)  = I 

13.  IF  OTHER  PARAMETER  VARI/\BLE  IN  DIAGNOSIS  THEN 
AHJACENGT  mTRIX  (variable  NOW;,  DIACMOSIS  NODE)  = I 

14.  IF  THERE  EXISTS  A STIMULI  AND  ^DASlJRE^n•:^T  CON.JUNCTUTJ  WITHIN  TEST  MODULE 
niEN  ADJACENCY  MATRIX  (STIMUI.I  CONJ.  NODE,  MHASURBIENT  CONJ.  NODE)=l 

15.  IF  'SEQOPT'  = 1 THEN  PRINT  ADJACLNCY  NUTRIX  RETORT 

16.  END 


1 

1 

FIGURli  .3.7  AirORmiM  TO  CREATE  AOJACFJ^CY  MATRIX 
(continued) 
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INTRA  ^DDU1.H  SHQieJCING  SYTEST0003 
ANALYSIS  CF  TID-  ADJACENCY  MATRIX 

123456789 


1 $S  WOOOl 

2 SMlVOOOl 
5 $MJV0002 

4 4 

5 5 

6 6 

7 VARl 

8 FI 

9 VI 


ADJACENCY  REPORT 
FIGIJI^  3.8 


CONJUNCTION  010000000 

CCW.JUNCriON  000000011 

ASSERTION  000000000 

DIAGNOSES  OOOnOOlOO 

DIAGNOSES  000000000 

DIAGNOSES  000000000 

VARIABLE  011000000 

VARIABLE  0 C 1 0 0 1 0 0 0 

VARIABLE  000000000 
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4.  PRELIMlNm  ANALYSIS  OF  mi  AUJACILNCA'  MATRIX 

After  entering  die  known  precedence  relations  into  the  adjacency 
nuitrix  an  analysis  is  performed  to  guarantee  that  the  test  module  is 
error  free.  This  section  corresponds  to  the  second  box  of  the  center 
partition  in  Figiirc  1.2.  Methods  verifying  target  variables  correct 
usage  are  discussed.  Specifically  four  t>7)es  or  ambiguities  or  inconsist- 
encies are  presented:  1)  excess  target  variables  per  assertion,  2) 
incorrect  target  variable  expression,  3)  wrong  aritiimetic  operator  in 
an  assertion,  ajid  4)  target  variable  defined  more  than  once. 

Section  4.1  presents  an  overview  of  the  analysis,  and  section  4.2 
details  the  algoritlim. 

4.1  OVERVIBV  OF  TilE  ANALYSIS 

Tliis  section  begins  the  evaluation  of  conjunctions,  assertions, 
and  diagnosis  variables.  To  clarify  the  forthcoming  discussion,  a new 
sample  test  module  is  presented  in  Figure  4.1.  This  test  module  is 
composed  of  two  conjunctions,  three  assertions,  and  one  diagnosis.  The 
logic  to  invoke  the  diagnoses  has  been  eliminated  since  it  is  not  a 
contributing  factor  in  intra-test  secjuencing.  Although  the  test  module 
may  appear  well  formed,  it  posses  multiple  errors  that  would  prevent 
sequencing  and  final  code  generation. 

The  methods  used  to  ascertain  the  correctness  of  a test  module  are 


dependent  on  the  adjacency  matrix.  Recause  it  contains  the  repre- 

•sentation  for  all  conjunctions,  assert  ions,  diagnoses,  ;md  variables,  it 
reduces  the  necessity  of  retrieving  tlic  original  source  strings  from 
tlie  associative  mentor)'. 


STIMULI  $S_ONn(ONl-;) ; 

CONJUNCTION  A3: 

(J22,GNl))  = SINI-J-)  (Y.VOLT,  Z,  Z,  X SLC) 

T/WOLT:  Y,  Z 
SOURCI-;  X; 

NEASURBENT  $M_ONE(ONE)  ; 

CON.n)NCriON  A2:  ( J24_3,  GND)  = CONS_T(27. 5 VOLT) ) ; 

ASSERTION  A4($M_ONE): 

X = Y 

TAROET:  Y,Z 
SOURCE:  X; 

ASSERTION  A5($M_ONl-)  : 

X-1  = Y 

TARGET:  X 
SOURCE:  Y; 


ASSERTION  A6($M_ONIi): 
Y < X 

TARGET:  Y 
SOURCE:  X; 


DIAGNOSE  Dl: 

OPER/XTOR  RESP0NSE=IX) 
TYI’E  = D; 


FIQJRi;  4.1  SANELE  TEST  ^^^r)ULI•,  WITH  UNDETI-CTED  ERRORS 


! 


26 


Target  variables  and  operator  responses  have  special  significance 
in  the  preliminary'  analysis.  To  achieve  successful  sequencing  of  the 
test  module,  the  variables  must  exjilicitly  adJiere  to  the  conventions 
established  in  the  NOPAL  Ljinguage  Reference  Manual.  Rather  than 
examining  each  statement  in  the  test  module,  the  analysis  can  be 
expedited  by  using  a special  partition  within  the  adjacency  matrix 
that  contains  all  target  and  operator  responses.  Formally,  the  partition 
consists  of  the  columns  that  refer  to  variables  and  the  rows  that  refer 
to  conjunctions  assertions  and  diarjioses.  ilie  commonality  of 
variables  in  this  partition  is  that  the  target  variable  is  evaluated 
after  the  conjunction  or  assertion  is  executed  while  the  operator  res- 
ponse of  a diagnosis  is  set  after  the  diagnostic. 

The  adjacency  nvitrix  for  the  sample  test  module  is  presented  in 
Figure  4.2.  Tlie  relevant  partition  to  the  discussion  is  surrounded  by 
a heavy  broken  line.  It  contains  all  target  and  operator  responses 
in  the  test  module.  /In  additional  column  labelled  "Ml'"  is  inserted  to 
the  right  of  column  nine.  'Hie  contents  ot  this  vector  are  the  total 
number  of  target  variables  per  conjimction  or  assertion.  It  begins  in 
row  1 and  terminates  in  row  5.  Below  row  nine,  an  additional  row  labelled 
"ND)"  is  inserted.  It  contains  the  total  muilier  of  times  each  variable  is 
defined  to  follow  the  conjunction,  assertion,  or  diagnoses,  llius  it  is 
calculated  by  adding  the  content  of  each  column,  and  expanding  the 
.partition  to  include  diagnoses.  Enhanced  processing  time  is  achieved  by 
using  the  matrix  as  well  as  the  additional  row  and  column. 

'I'hc  next  section  describes  the  algoritlmi  that  evaluates  the 
relations  in  the  aforementioned  partition. 
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1 CQ\.J 

2 CQNJ 

3 ASOT 

4 ASRT 

5 ASRT 

6 niAG 

7 VAR 

8 VAR 

9 VAR 


12345  0 789 

X Y Z 


2 3 2 

Mil 


riGURF,  4.2 


ARJAaiNCTi’  MATRIX  FOR  S.Vn''LF,  TF.ST  MOLXJLE  - FianiE  4.1 


4.2  ALWRI'niM  PURIWllNG  ANALYSIS 


Inconsistencies  discussed  in  this  section  are  grouped  in  two 
categories:  1)  assertions  that  employ  target  variables  and  2)  con- 
junctions, assertions,  and  diagnoses  that  employ  the  same  target  variable 
and/or  operator  resixjnse.  A suiiDnar>’  of  the  user  messages  is  shown  in 
Figure  4.3.  The  overall  classification  of  the  message  is  on  the  left  side 
of  the  diagram,  with  the  actual  text  on  the  right  side.  Each  error  or 
warning  message  states  the  test  module,  the  statcnx?nt,  the 
associated  variable,  ;md  tlie  iunbiguity.  Abbreviations  are  not  used  to 
avoid  confusing  the  inexperienced  user. 

^bst  of  this  analysis  concems  the  special  conventions  used  with 
assertions  that  employ  target  variables.  Of  special  concern  is  that  each 
assertion  may  use  only  one  target  variable.  The  verification  of  this  is 
implemented  by  searching  the  "MT"  coliunn  in  the  sample  test  module.  If 
any  sum  is  greater  tJnui  one,  the  process  continues  to  check  whether  tlic 
node  in  the  dictionan’  is  an  assertion.  If  this  situation  does  occur, 
the  first  error  message  of  Figure  4.. 3 is  issued.  An  example  of  this 
t>T>o  of  error  is  showi\  with  assertion  A4  (Figure  4.1j  having  two  target 
variable,  y and  z.  ’Oie  ”2"  in  the  first  position  of  NIT  is  not  signifi- 
cant as  the  dictionary  node  indicates  that  it  is  a conjunction. 

/Xnother  convention  pertaining  to  assertions  that  einjiloy  target 
variables  is  that  the  variable  must  precede  the  equal  sign.  Expansions 
or  nodi fi cat  ions  by  perfonning  multiplication,  division,  subtraction,  or 
addition  are  not  allowed  before  the  equal  sign.  Ihis  convention  is 
consistent  with  the  standard  mathematical  notation  of  placing  the  result 
of  a computation  of  the  variable  preceding  the  equal  sign.  The 
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1 *ERKOR  (/V^BIGUITY):  IN  ASSERTION OF  TEST 

THERE  ARE  TWO  OR  MORE  TARGET  VARIABLES 

9 9 • 

2 *ERROR  (AMBIGUnT);  EXPRESSION ^PRECEDING  THE '=' IN 

ASSERTION OF  TEST ^DOES 

NCTT  MATQI  THE  TARGET  VARIABLE 

3.  * WARN  INC.  IN  ASSERTION OF  TEST 

( INCONSISTENCY) ; 

A VARIABLE  IS  nECIAREH  AS  TARGET;  BET  TIE 
RELATION’  OPER/\TOR  IS  NOT  AN'  = : REPLACED 
BY  AN  EQU/\1,  SIGN’, 

4,  ’^WARNING  VARH\BLE  OF  TEST 

(POSSIBLi;  A^IBiaJITY) : 

IS  DEFINED  MORli  'HIAN  ONCE  IN 


FIGURE  4.3  SUNM4RY  OF  ERROR/WARNING  lESSAGES 
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verification  is  iin]->lciix'nted  by  first  searchiiiB  the  ''Mr”  column  of  the 
adjacency  nvitrix  to  ascertain  whether  the  waveform  employs  a target 
variable.  If  imy  sum  in  this  coUmm  is  greater  than  one,  the  process 
continues  to  chock  whether  the  node  in  the  dictionary  is  an  assertion. 

Ihen  the  target  variable  indicated  within  the  isolated  partition  is 
compared  to  the  text  retrieved  from  the  associative  memory  which  pre- 
cedes the  equal  sign.  If  both  expressions  are  not  equivalent,  the 
second  user  message  in  Figinx'  4..^  is  issued.  .‘Vi  ex;imiile  of  this  tyjie 
of  ajiihiguity  is  shown  in  assertions  A5  and  A6.  (Figure  4.1j  Target 
variables  V or  Z used  in  A4  difleront  th;m  X,  the  actual  expression 
which  precedes  the  eoual  siv^i.  .-M.so  target  variable  X of  /Xssertion  AS  is 
different  th;m  the  actual  expression  "x-l"  which  precedes  the  equal  sign. 

'Hie  equal  sign  is  the  sole  operator  permitted  when  assertions  employ 
target  variables.  Ihe  implementation  strategy  is  similar  to  the 
assertion  categories  already  discussed.  By  evaluating  "MT”  and  the 
dictionaiy.  assertions  are  located  that  em{iloy  target  variables.  Once 
these  assertions  are  known,  the  operator  is  retrieved  from  the  associative 
memor)'.  If  it  is  not  an  equal  sign,  tlie  third  user  message  is  issued. 
Ooncurrently,  the  operator  is  changed  to  an  equal  sign  in  the  associative 
memory.  For  exiuntile  assertion  A6  exhibits  this  characteristic  by  using 
a less  th;ui  operator  instead  of  ;ui  equal  sign. 

.Should  the  sanx;  variable  be  the  target  of  a conjunction  of  assertion, 
.and  also  the  operator  resiHuise  of  a di.ignosc,  tlicre  exists  a possibility 
that  the  user  has  made  an  error  by  multipley  defining  the  variable.  Tlie 
implementation  is  different  from  the  pivceding  three  as  the  partition 
(Figure  4.2  1 is  exp.uided  to  include  oivrator  responses.  Ihis  is 
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acconn)! i shed  by  including  flic  diagnosis  rows  as  showi  in  the  circle 
surrounding  columns  7,8,9  of  row  6, 


fmcc  the  partition  is  enlarged,  the  sum  of  eadi  coUmm  is  stored 
in  an  additional  row,  "Mil”,  located  at  the  bottom  of  tlie  adjacency 
matrix.  The  contents  of  "MD"  indicate  tlie  total  number  of  times  each 
variable  is  defined  as  target  to  a conjunction,  target  to  an  assertion, 
and  the  operator  response  of  a diagnosis.  If  .my  sum  is  greater  thaji 
one,  the  fourth  user  message  is  issued.  Tlie  sarni^le  test  module  (Figure 
4.1)  displays  three  e.\;uni''los  of  this  ;imliiguity.  Tliey  are: 

1)  variable  X defined  in  assertion  AS  and  diagnosis  Dl. 

2)  variable  Y defined  in  assertions  A4,  A6  and  conjiniction  A7>. 

3)  variable  Z defined  in  assertion  A4  ;ind  conjuiction  A3. 

The  process  of  perfonning  the  .'uialysis  discussed  in  this  section 
is  sumnvirized  in  the  algoritlim  of  Figure  4.4.  Nfost  of  the  analyses  are 
performed  sinnily  by  going  up,  dowii,  and  across  the  adjacency  matrix 
searching  for  "I's"  indicating  predetermined  relations. 

Even  though  a procedure'  successfully  passes  the  preliminar)’’  analysis 
covered  in  this  section  ;uid  in  -s\nt.x\  ;malysis,  it  does  not  necessarily 
guarantee  that  there'  arc  no  hidden  or  inferred  iuihiguitics.  For  e.x.amiilc 
the  sample  test  mothile  possesses  a circular  definition  that  c;utnot  be 
.sequenced.  Ihscovcring  its  existence  is  a non-trivial  task  whose  com- 
plexity imiy  bo  .seen  by  atteniiiting  to  iminually  locate  it.  .last  as  it  is 
a difficult  process  in  a short  test  nxadule  of  only  six  lines,  imagine 
tlie  difficulty  when  using  a test  module  c.xceeding  fifty  lines.  The 
comjilexity  of  detecting  these  inconsistencies  iruinailly  led  to  the 
development  of  an  automatic  process  of  checking  all  test  modules  for 
this  type  of  inconsistency. 
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SUMM\KV  Al.GORrniM 

PRliLIMJN/\RY  ANALYSIS  OP  'nni  ADJACPNCY  MATRIX 

LET  ffW  = NUMBER  OP  OON.JUNCTIONS  AND  ASSERTIONS  IN  AUJACENCY  M,\TRIX 
LET  tfD  = NUEER  OP  DIAGNOSES  IN  ArUAQlNCY  MATRIX 
LET  n'  = .\'U>BER  OP  VARIABLES  IN  ADJACENLT  MATRIX 

LET  »N  = TCn-/\L  NUNBER  OP  CON.JlJNCria^S,  ASSERTICKS,  DIAGNOSES,  VARIABLES 
LET  llOMl  = TfN  + 1 

LET  DICTIONARY  (NI  = LIST  OP  CONJINCTION,  ASSERTION,  DIAGNOSIS, 

AND  VARIABLE  L\BEI^.  (SIZE  DETERMINED  BY  N) 

LET  ARIACENCY  MATRIX(N,N)  = MATRIX  SLOI  Tl-IAT  EAQI  POSITION  CORRESPONDS 
TO  ITIE  LABEL  IN  POSITION  X OP  TIE  DICTIONARY. 

1.  /*  MIRE  T-IiW  I TARGET  \Y\RIABLE  PER  ASSERTION  # 

2.  PERFORM  3-6  FOR  E/\CI1  cmJWCTION  AND  ASSERTION  (1=1  to  #W) 

3.  #E=0 

4.  IF  DICTIONARY(I)  IS  /\N  ASSERTION  THEN 

PERFORM  5 FOR  EAQI  POSSIBLE  EARIET  VARIABLE  (J=HOMl  TO  N) 

5.  IF  ATUACENCl’  MATRIX(I,J)  = T'  THEN  #E  = #E  + 1 

6.  IF  #E  > 1 TIEN  PRINT  ERROR  #1 

7.  /*  TARGIT  VARIABLE  MUST  PRECEDE  ARITII  OPERATOR  */ 

8.  PERFORM  9-12  FOR  EAQI  CONJUNCTION  AND  ASSERTION  (1=1  TO  IIIV) 

9.  IF  DICTIONARY  (H  IS  AN  ASSERTION  DEN 

I’ERI-ORM  10-12  FAIR  1A(>I  IXISSIBLE  TAR(ET  VARIABIE  (J=llOi'U  TO  N) 

10.  IF  ADJACENCT-  M/Vl'RIX  (I,.l)  = '!’  HEN 
PERFORM  11-12 

FIGURF,  4.4 
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11.  RKTRIBTi  THXT  PRIXT.niNG  OI’l-llATOR 

12.  IF-  TEXT  7 = DICTIONARY  (J)  THEN  PRINT  ERROR  #2 

13.  /*  ASSERT  1 0N.S  ARITHMETIC  OPERATOR  V 

14.  PERFORM  15-18  FOR  EAQI  (mJUNCTION  AND  ASSERTION  (1=1  TO  %')  ; 

15.  IF  DICTTOiNARY(I)  IS  AN  ASSERTION  THEN 

PERFORM  16-18 

16.  #E  = 0 

17.  RETRIEVT  OPERVIDR  FROM  TOE  ASSOCIATIVE  MEiMDRY 

18.  IF  OPERATOR  IS  NOT  EQU,\1,  TO  ' = ' TIEN  PRINT  ERROR  #3 

AND  REPLAQ;  ASSERTION’S  OPERATOR  IN  TOE  ASSOCIATIVE  ^eDRY  WITH  ' = '. 

19.  /*  MULTIPLEY  DEFINED  TARGET  VARIABLES  */ 

20.  PERI-ORM  21-24  FOR  EAQI  V/VRl.ABLE  (1=  HONQ  TO  N) 

21.  KE  = 0 

22.  PERFORM  23  FOR  EAQI  aiNJHNCTICN',  ASSERTION,  DIAGNYISIS  (J=l  TO 
#W  #0) 

23.  IF  /AIAIACENCY  H\TRIX(.J,n  = '1'  THEN  #E  = 'IE  1 

24.  IF  #E  > 1 EEN  PRINT  ERROR  #4 

25.  END 


FiaiRE  4.4 
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rius  sivtioii  ilisciissos  tlu'  inxuoss  of  ilotcct  iiit’,  oircuLir  Jofiiiit  loiis 
that  inijilit  oxist  in  tho  ilijjraph.  It  (.'oitcsixmuIs  to  the  tliird  box  within 
the  center  [lartition  of  the  NOI’AI,  puKessor  diagram  (l'ip,ure  1.2).  llic 
implenx'ntat  ion  is  achieved  by  const  met  iny,  a 'patli'  matrix  to  reveal 
direct  and  iiniilied  jiaths.  Tnuisitive  or  circular  definitions  are  easily 
isolated  in  tliis  nvitnx.  Upon  detection,  additional  processing,  is 
subseqiK'nt  ly  perfonned  to  isolate  tlieir  exact  nodes  and  report  tliem  to  the 
user.  Section  5.1  discusses  an  overview  of  tlie  pmcess  wliile  section  5.2 
details  the  .ilyoritlim  which  constructs  tlie  path  matrix. 

5.1  ovKKVifiv  i)!'  nim-.trfiNC  t:iw:iii./\it  uidUNiTioNS 

As  tile  lumber  of  diyiajih  nodes  increase,  tlieix'  exists  a yix'ater 
IH)ssibility  of  yenerat iny  a cycle.  A cycle  is  defined  as  a sequence  of 
inter-connected  nodes  such  tliat  the  final  node  and  tlie  lieyiiuiiny  node 
are  tlie  s.iiiie.  Simply  it  is  a closed  loop,  or  endless  sequence  of  test 
st  at  eiiK'iit  s.  iliis  ambiyuity  must  be  corrected  before  proceediny  to  the 
seqixaiciny  phase  of  the  NOl'Al,  pixicessor. 

A sample  diyraiili  containiny  circular  ambiyuity  is  shown  in  I-iyure  5.1. 
iiie  diyraph  nodes  correspond  to  dictionary  labels  ”1",  ''2",  ".5",  "4",  ”5". 
'llie  most  obvious  cycle  iiresent  exists  between  noiles  ”1"  and  "5".  Nixle  "1" 
has  a direct  path  to  node  ”5'';  similarly  node  "5"  has  a direct  jiath  to 
node  "1”.  'llierefore  node  ”1"  must  jirecede  node  "5”  /\N11  node  "5"  must 
precede  node  "1".  lliis  ambiyuity  is  one  of  many  present  within  the  diyr.iph 
that  must  be  detected  before  pmceediny  to  the  intra  test  sequenciny. 

If  all  test  imidules  ixmtained  less  than  ten  positions,  then  detect iny 
closed  loo|is  would  be  trivial.  Hv  yenerat  iny  a pictorial  yraph  of  the 
test  module,  the  user  could  then  examine  it  to  veryify  it  is  cvcle  free. 
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However  as  the  size  of  test  modules  grows,  exceeding  fifty  positions,  the 
manual  process  becomes  increasingly  complex.  Performing  this  function 
manually  is  inappropriate  for  a general  purpose  system  wlnich  promotes  the 
simiilification  of  specifying  test  situations.  'Hius  an  automatic  algorithm 
was  incorporated  to  detect  the  presence  of  circular  definitions. 

The  adjacency  matrix  for  the  digraph  (Figure  S.l)  is  presented  in 
Figure  5.2.  E.ich  path  is  a direct  link  between  two  digraph  nodes.  For 
example  the  path  emanating  from  node  "4"  ;uid  teiminating  at  node  "5"  is 
indicated  in  the  fifth  column  of  the  fourth  row.  Indirect  paths  such 
as  the  one  beginning  at  node  "4"  continuing  through  nock?s  "2",  "1", 

"3",  and  ultimately  terminating  at  node  "4"  are  not  shown  in  this  matrix. 

An  efficient  method  to  detect  circular  definitions  involves  creating 
a matrix  that  exliibits  all  paths.  A path  matrix  if  formed  as  a trans- 
formation of  tlie  adjacency  matrix  that  acconijilishes  this  goal.  Formally 
the  path  matrix  indicaies  the  existence  of  paths  regardless  of  length 
from  node  i to  node  j.  It  is  sometimes  referred  to  as  a 'reachability' 
matrix  due  to  its  attribute  of  displaying  a siumnary  of  nodes  which  may  be 
reached  from  other  nodes. 

The  path  matrix  for  the  samjile  digraph  is  presented  in  Figure  5.3. 

Every  entry  has  a "1"  showing  that  any  node  may  reach  any  other  node  includ- 
ing itself.  For  example  node  "4"  may  reach  nodes  "1",  "2",  "3",  "4".  In 
essence  this  nvitrix  reports  the  existence  of  all  paths,  direct  or  indirect. 
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1 2 3 4 5 
1 0 0 111 

■ 2 1 0 0 0 0 

I 3 0 0 0 1 1 

4 0 0 0 0 1 

i 5 110  0 0 

AEJ AGENCY  MATRIX  FOR 
SAMPLE  DIGRAPH 

FIGIM:  5.2 


1 2 3 4 5 

1*.  If*.  1111 

•%  *. 

2 l\l\l  1 1 

3 1 IM’.l  1 

4 ^ 1 1 V *1 

n** 

5 1111  ‘i.I 

PATH  MATRIX  FOR 
SAMPLE  DIGRAPH 

FIGURE  5.3 

'1'  ON  DIAGONAL  INDICATES 
CYCLES  IN  DIGRAPH 
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Althoujih  it  is  possible  to  derive  circular  definitions  directly  from 
the  adjacency  matrix,  it  is  not  a conputationally  efficient  approach. 
f)nce  the  path  fnatrix  is  created,  the  presence  of  one  or  more  cycles  is 
detected  by  searching  for  a "1"  on  the  diagonal.  If  there  are  no  cycles 
in  the  graph,  the  system  precedes  to  tlic  next  phase,  precedence  deter- 
mination. Othervv’isc,  the  nodes  that  constitute  the  closed  loop  are 
determined  using  the  'cycle'  procedure  shown  in  Section  6. 

The  following  section  explains  the  transformation  pcrfomicd  to 
produce  the  path  imtrix. 

5.2  CONSTRUCTING  TUH  PA'IH  MATRIX 

The  path  matrix  (P)  consists  of  ones  and  zeroes  with  a "1"  in  row  i 
and  coluirai  j if  there  is  a path  fi'om  node  i to  node  j.  Tl^e  procedure  used 
to  construct  this  matrix  is  adapted  from  Warshall's  algorithm  fWarshall, 
1962]  summarized  in  Figure  5.4. 

The  teclmiquc  begins  by  copying  tlic  adjacency  matrix  into  an  empty 
path  matrix.  The  columns  of  the  path  matrix  arc  then  traversed  searching 
for  "I's".  For  each  "1"  in  Pi j , a patli  exists  from  node  i to  node  j. 
Tlierefore  any  path  from  node  j is  also  coimiKm  to  node  i.  Facli  path  (k) 
from  row  j is  copied  to  the  k column  of  row  i. 

For  example  the  adjacency  matrix  of  Figure  5.2  shows  node  "1”  having 
paths  to  nodes  "3",  ”4",  "5".  Ilie  sole  path  in  node  "2"  is  to  node  "1". 
Since  node  "1"  can  he  reached  from  node  "2",  all  patlis  from  node  "1"  c;ui 
also  be  indirectly  reached  from  node  "2".  llic  algoritlju  continues  by 
placing  "I's"  in  column  "3",  "4",  "5"  of  row  2. 

The  constructed  path  n«trix  reveals  tlie  presence  of  cycles  by 
exJiibiting  "I's"  on  any  diagonal,  llie  next  section  (6)  explains  the 
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I 

I process  of  enumerating  the  distinct  nodes  that  constitute  the  cycle. 

P = path  matrix 

A = adjacency  matrix 

n = number  of  nodes  in  digraph 

1.  Let  P = A (for  all  ij) 

2.  Set  j = 1 

3.  Set  i = 1 

4.  IF  Pij  = "1"  then  Pik  = Pik  Pjk  (for  all  k=l  to  n) 

5.  Set  i = i+1;  if  i = n,  TIEN  go  to  4 

6.  Set  j = j+1;  If  j = n,  then  go  to  3;  else  return; 


ALGORITHM  TO  CONSTRUCT  PATH  MATRIX 
FIGURE  5.4 
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6.  ENUMERATING  CIRCULAR  DliFINlTlClNS 

This  section  discusses  the  procedure  which  locates  the  exact 
statements  constituting  circular  definitions.  The  implementation  is 
associated  to  the  fourth  box  within  the  center  partition  of  the  NOPAI, 
processor  diagrajii  (Figure  1.2).  It  is  invoked,  if  and  only  if,  cycles 
are  detected  on  the  diagonal  of  the  path  matrix.  In  essence,  the 
algorithm  provides  a user  aid  for  debugging  inconsistencies  in  the  test 
module.  Tlie  discussion  begins  with  a general  overview  of  the  technique 
employed  followed  by  an  illustration. 

6.1  BUILDING  TREES  TO  LOCATE  CIRCULAR  DEFINITIONS 

Tliere  are  three  parameters  used  to  isolate  circular  definitions 
\dthin  the  digraph.  They  are  the  adjacency  matrix  (A),  the  path  matrix 
(P) , and  the  number  of  nodes  (n)  in  the  digraph.  The  algorithm  finds 
cycles  by  the  principle  that  node  i is  in  a cycle  with  node  k,  if  Ajj^ 

^ki  ~ tbere  is  a path  from  node  i to  node  k and  a path  from 

node  k back  to  the  node  i.  Formally,  the  extension  of  digraph  paths 
adequately  traces  circular  definitions. 

Extended  paths  isolating  circular  definitions  are  referred  to  as 
trees.  A tree  is  a set  of  connected  nodes  that  begin  at  a predetermined 

j 

root  or  top  node,  and  continue  to  a teniiinal  or  final  node.  At  each  inter-  | 

I 

val,  as  the  tree  increases  ip  length,  the  terminal  node  is  compared  to  the  | 

i 

root  node.  If  they  are  equivalent  the  tree  is  circularly  defined.  Else  | 

tlie  tree  continues  to  grow  luitil  the  end  of  the  path  is  reached  or  the  } 

tree  Icngtli  exceeds  the  numlier  of  nodes  in  the  digraph.  j 

Adapted  from  [Rerztiss,  1971]  the  tree  generating  algorithm  is  jj 
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summarized  in  Tij^urc  6.1.  It  commences  by  building  the  tree  beginning 
with  node  "J”  idiere  each  extension  is: 


A,  . X P.,  = "1"  (i=l  to  n) 
il 

Figure  6.2  shows  a sample  digraph,  its'  adjacency  matrix,  and  the 
constructed  trees,  llie  algorithm  deletes  past  root  columns  and  rows  to 
expedite  processing.  Figure  6.3  illustrates  the  output  produced 
from  the  "cycles"  algorithm  invoked  to  evaluate  the  sample  digraph.  The 
error  message  explicitly  defines  ambiguous  nodes. 

Tliere  arc  several  methods  which  might  be  used  to  correct  the 
circular  inconsistency.  The  user  should  initially  begin  by  reviewing  the 
NOPAl.  Test  Specification  Report  to  verify  that  the  statements  and  variables 
correspond  to  the  intended  source  file.  The  next  logical  procedure 
is  to  scan  the  Cross  Reference  and  Attribute  Report  for  the  existence 
of  slightly  different  labels,  which  may  be  the  result  of  typographical 
error.  The  Adjacency  Matrix  Report  is  useful  because  it  reproduces  i 

I 

the  system  interpretation  of  tlie  test  module.  Warning  and  error 
messages  produced  during  the  preliminary  analysis  of  the  adjacency 
matrix  may  be  the  best  clue  to  those  variables  incorrectly  defined. 

The  above  methods  combined  with  the  output  from  "cycles"  provide 
extensive  diagnostic  assistance. 
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l,et  A = Adjacency  Matrix 

Ixjt  P = Path  Matrix 

If't  N = Nuniier  of  notes  in  Digraph 

liOt  Root  = Beginning  node  of  tree 

Ix't  I,cvel  = Number  of  nodes  in  tree 

Let  Path(k)  = Actual  nodes  in  tree 


Algorithm  tTl'CLES: 

Cycle 

Enumerat ion 

Step  1. 

Root  = 1 

Step  2. 

(initiate 

tree; 

steps  2 to  6) 

Set  RiiAQ-U  (k)  = Root  (for  k=Root  to  n) 

Step  3.  Set  LISl-D  (kj  = 0 (for  k=Root  to  nl 
Step  4.  Set  levcl=l. 

Step  5.  PATH  (l)=Root. 

Step  6.  Set  i=Root. 

Step  7.  (Test  if  current  path  can  be  extended  witii  nodes  in  a cycle; 
Steps  7-11) : 

IF  REAQi.1  (i)  > n then  go  to  Step  12. 

Step  8.  Set  j=  RliAGIJ  (i). 

Step  9.  If  A(i,j)*P(j ,Root)=l  and  -lUSED  (j)  then  go  to  Step  18. 

Step  10.  Set  j=j+l. 

Step  11.  If  j < =n  then  go  to  Step  9. 


Step  12.  (Backtrack  in  tree,  resetting  REAQIJ  and  USED  ; 
Steps  12  through  17): 

Set  REACHJ  (i)  = Root. 

Step  13.  Set  USED  (i)  = 0. 

Step  14.  Set  level=lovel-l. 

Step  IS.  If  level =0  then  go  to  Step  26. 

Step  16.  Set  i = PATH  (level). 

Step  17.  Go  to  Step  7. 


Stop  18.  (Extend  path;  Steps  18  througli  23)  : 

Set  USED  (j)  = 1. 

Step  19.  Set  RIIAGIJ  (i)  = J+1 
Step  20.  5Tet  level=lcvel  - 1. 

Step  21.  Sot  PATH  (level)  = j. 

Step  22.  Set  i=i . 

Step  23.  If  j ■^=Root  tlicn  go  to  Step  7. 

Step  24.  (Print  C>"clic  Patli): 

Print  PAIH  (k) , k = 1 to  level  ('iicssage  H) . 


Step 

2S. 

Go  to  Step  13. 

Step 

26. 

Set  Root=Root+l. 

Step 

27. 

If  Root  <=  n then  go  to  Step  2 

Step 

28. 

Return 

"D'GI.IiS  AI,CX)RmI^^' 
ITGURE  6.1 
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SAMPLE  DIGRAPH,  ADJACENCY  MATRIX,  AND  TREES 
FIGURE  6.2 

ERROR  (Circular  definition) : The  following  group  of  items  in  test  above 
are  circularly  defined: 


A,C,D,E,A 

A,C,D,E,B,A 

A,C,E,A 

A,C,E,B,A 

A,D,E,A 

A,D,E,B,A 

A,n,A 

A,E,B,A 


SAMPLE  Om'PUl’  FROM  CYCLE  ENUMERATING  PROCEDURE  ANALYZING 
DIGRAPH  OF  FIGURE  6.2 


FIGURE  6.3 
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7.  PRl-CEDIZNCE  DLTHKMINATICW  AND  SEQUENCING  AI.GORITUM 

Ihis  section  discusses  the  final  phase  of  intra  test  sequencing 
shown  by  the  fifth  box  in  the  center  partition  of  the  NOPAJ.  processor 
diagram  (Figure  1.2).  The  theme  of  this  section  is  the  algoritlim  which 
automatically  sequences  the  non -procedural  source  input  statements. 

The  reoidered  statements  are  included  in  an  optional  'flowchart'  report 
for  user  convenience.  After  successfully  ordering  the  NOPAL,  statements, 
code  is  automatically  generated  and  stored  on  a disk  file  by  the 
processor. 

The  implementation  algorithm  is  adapted  from  [Berztiss,  1971] 
analysis  of  paths  ajid  cycles  in  digraphs.  Tlie  computer  program  is 
an  adaptation  of  a program  written  by  Adam  Rin  in  his  Ph.D. 
dissertation  [Rin,  1976].  Rins  implementation  automatically  generates 
a business  applications  program  from  non -procedural  source  specifi- 
cation statements.  Although  ihe  app.V cation  is  functionally  different 
than  devising  techniques  to  generate  programs  for  automatic  test  equip- 
ment; tlie  sequencing  process  for  non-procedural  input  is  fundamentally 
equivalent. 

The  following  sections  present  an  overview  of  the  sequencing 

algorithm  followed  by  an  example  including  the  optional  flowchiirt 
report. 
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7.1  OVERVIEW  OF  PRECEDENCE  Dim- RMI  NAT  ION 

The  comi) rehens iv'e  design  of  the  adjacency  matrix  insures  that  it 
contains  the  necessary  information  for  intra-test  sequencing.  After 
complex  error  analysis  verifies  the  validity  of  the  digraph,  the  nodes 
are  ranked  according  to  precedence  and  reordered  according  to  their 
rank. 

The  easiest  method  to  implement  the  sequencing  strategy  is  through 
matrix  multiplication.  For  example,  the  adjacency  matrix  A,  displays 
paths  of  length  1 from  i to  j . A^  displays  paths  of  length  2.  Formally 
A^  displays  the  paths  of  length  j.  At  each  stage  of  the  matrix  multi- 
plication, the  column  of  the  current  rank  set  contains  all  zeros;  having 
no  predecessor  with  the  current  length  path.  Frnploying  a well  formed 
digraph,  the  algorithm  terminates  when  all  entries  in  A are  zero 
requiring  at  most  n stages  (j  = n). 

Althougli  the  above  approach  is  straight-forward,  it  is  not  the 
most  efficient  implementation  because  the  matrix  multiplication  requires 
n^  steps.  A much  quicker  algorithm  to  sequence  the  digraph  nodes  is 
given  in  algoritlim  "preceed"  (Figure  7.1).  Titis  algorithm  analyzes 
the  original  matrix  in  n^  steps  without  performing  multiplications. 

The  algorithm  works  by  first  finding  all  the  nodes  of  rank  0; 
i.e.  all  the  nodes  which  do  not  have  precedents  (Step  2).  This  is 
simply  all  the  nodes  which  have  all  zeros  in  their  column  (in  Step  2, 
these  arc  all  coliunn  nodes  j that  aix?  put  in  set  0(0) ; the  "i”  in 
the  condition  arc  the  row  entries  in  each  such  column  j).  These 
nodes  become  the  elements  of  rank  set  D(0) , and  the  rank  of  all  such 
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Algorithm  (PRECEFP):  Precedence  lietcrmination 
the  following  s>Tnl'>ols  are  used: 

A The  input  n x n adjacency  matrix  (row  and  column  for  each  node) 
i row  index  for  A 

j coliurat  index  for  A 

U a vector  of  "rank  sets";  each  rank  set  (element  of  the  vector) 
consists  of  a set  of  nodes  at  that  rank. 

1 rank  counter;  index  to  D (i.e.  in  the  algorithm,  D(l)  is  the 
set  of  nodes  of  rank  1;  D(l-J.)  is  the  set  of  nodes  of  rank  1-2  etc.) 
n the  number  of  nodes;  also  the  number  of  rows  and  columns  of  A; 
also  the  number  of  elements  in  vectors  R and  0. 

P is  set  successively  to  each  node  in  the  previous  rank  set, 

Dd-U ; indexes  row  of  A 

q is  set  successively  to  each  node  in  the  current  rank  set  D(l) ; 
indexes  column  of  A;  also  indexes  R 

R tlie  "rank  vector"  that  is  produced  (has  n elements) ; the  index 
to  R is  a node  number;  the  value  of  each  element  of  R gives  the  rank 
of  that  node;  e.g.  R(q)  gives  the  rank  of  node  q. 

0 the  "order  vector"  produced  (has  n elements) ; the  indices  to  0 
are  the  sequence  or  step  numl^ers  (1,2,3,...);  the  value  at  each  element 
of  0 is  the  node  number  to  be  executed  at  that  jxjsition. 


Al.rORITlL'l  (PRP.CHHD)  PRHCHPHNCH  HHTHRMINATKTN 
IdaiRl-  7.1 
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STl'.l’  AlA'ORiniM 


HXPl^WATION 


1 


A 

4 

5 


6 


8 


9 


Initialize  R to  all  zeros 

"o  • I '’i  • *>'1 

If  tlion  po  to  9 

1 ♦-  0 


1«-  1+1 

If  1 = n,  go  to  9 


If  IV  + II  then  go  to  4 
othcr^’ise  go  to  step  8 


Set  Order  vector  to 
Rearranged  nodes  in  Rank 
ascending  order 
(normal  exit) 

There  exists  at  least  1 
one  cycle  somewhere  in 
the  digraph 


Initially  Rank  vector  all  0. 

Nodes  of  rank  0 consist  of 
all  those  wiiich  have  no 
precedents 

i.e.  all  0 column 


Index  for  rank  set 
initially  0 


Next  rank  set  consists  of 
all  those  nodes  wliich  depend 
on  something  in  the  previous 
rank 

All  nodes  in  current  rank 
set  are  nuiked  with  level  1 

If  there  are  still  nodes 
in  current  rank  set,  go  back 
to  find  next  rank  set 


Nodes  are  now  ranked; 
simply  rearr;uige  nodes 
in  rank  order 

Ihis  is  because  tlic  algoritlmi 
has  gone  thru  n rank  sets 
:ind  dependencies  still 
exist  on  last  one 


ALGORITHM  PRi;(:i;i:i);  PRba;i)i;\A:H  DITHRMINATHTiN 
I IOIIRI-;  7.1 
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nodes  to  set  to  0. 


Secondly,  the  nodes  of  rank  1 are  direct  descendants  of  nodes 
in  rank  0;  similiarly  the  nodes  of  rank  2 depend  on  nodes  in  rank  1 
(possibly  updating  the  previous  rank  of  some  nodes) ; and  so  forth 
(Steps  3-6). 

At  each  stage,  the  algorithm  has  to  check  the  rows  of  the  previous 
set  of  nodes  for  direct  descendants  (Step  5) . After  the  nodes  have 
thereby  been  partitioned  into  rank  sets,  the  order  of  execution  of 
the  nodes  is  simply  a re-arrangement  of  the  nodes  according  to  their 
rank  (Step  8).  The  result  of  this  algorithm  is  an  order  vector  0, 
where  0(i)  is  the  node  to  be  executed  at  step  i. 

The  algorithm  terminates  when  either  all  nodes  have  been  ordered 
or,  theoretically  if  a cycle  exists  in  a network.  The  latter  is 
impossible,  however,  because  any  cycle  would  have  been  detected  in  the 
earlier  cycle  detection  and  enumeration  algorithm,  and  the  processor 
would  not  have  reached  this  point. 

To  best  illustrate  the  use  of  this  algorithm,  it  is  applied  to  the 
adjacency  matrix  of  Figure  7.2  which  corresponds  to  the  test  module  in 
Figure  2.2.  Beneath  the  adjacency  matrix  (Figure  7.3)  is  the  rank  set 
'vith  5 partitions  of  sequenced  nodes.  Explicitly  nodes  1,4,5  of  D(0) 
must  precede  node  7 of  D(l) . Similarly  node  7 must  precede  node  2 in 
n(2).  Node  2 must  precede  nodes  8 and  9 in  0(3).  Finally  nodes  3 aiid 
6 in  I)(4)  are  tlic  last  nodes  to  be  executed. 

The  existence  of  multiple  nodes  per  partition  such  as  in  0(0), 
D(3),  n(4)  indicate  the  possibility  of  executing  the  nodes  in  parallel. 


48 


IWIM  Mil|)UI,i;  SliQiniNClNC  SYvSTliST0003 
ANALYSIS  OI-  'llir.  AimACrNC^  MXTKIX 


1 

1 

<u 

3 

4 

3 

(> 

8 

0 

1 

$S  WOOOl 

rmniNCTUTvi 

0 

1 

0 

0 

0 

0 

0 

0 

0 

> 

$M  WOOOl 

VON.llINn'UlN 

0 

(' 

0 

0 

0 

(1 

0 

1 

1 

SNf’WOOOZ 

ASSRRTldN 

0 

0 

0 

0 

0 

0 

0 

0 

0 

4 

4 

i)iA(3xasi;s 

0 

0 

0 

0 

0 

0 

1 

0 

0 

3 

5 

niA(W(\si;s 

0 

0 

0 

0 

0 

0 

(1 

0 

0 

() 

(1 

DlAlWSliS 

0 

0 

0 

0 

0 

0 

0 

0 

0 

•7 

VARl 

VAR  1 AIM  ,1'. 

0 

1 

1 

0 

0 

0 

0 

0 

0 

8 

I'l 

VARl  aria; 

0 

0 

1 

0 

0 

1 

0 

0 

9 

9 

VI 

VARl  aria; 

0 

0 

0 

0 

0 

0 

0 

0 

0 

AlllAQiNa  miRlX  R1R  'niST  HIIXII.I;  (1  lUIRi:  1.2) 
I'laiRi;  7.2 


lUNK  SliT 


IH  U {7 > 

1)(’)  (2 > 

1H3)  jS > 

(r 4 

iH^Ji  p 4 

I 7 


siiQin-Nci'n  Nonr,  iari-.i.s 
$sjvoooi 

4 

s 

VARl 

$M  WOOOl 

I'l 

VI 

.'fiM  W0l)02 
() 


RANK  Sl-r  lUR  SVMl’ll'  I'liiRAI’ll  H'llIURL 
IHaiRi;  7.3 


IThc  present  system  uses  a single  central  processing  unit;  thus  multiple 
nodes  per  partition  are  executed  seciuentially.  As  the  research  into 
parallel  processing  continues,  future  systems  nuay  better  utilize  this 
diaracteristic. 

i A reorgtmi zation  of  the  statements  is  produced  in  the  Intra  Test 

1 Sequencing  Report  of  figure  7,4.  lliis  report,  which  resembles  a flow- 

j chart,  lists  the  reordered  statements  within  a particular  test  module, 

i 

Statement  and  variable  names  witli  the  actual  nmk  vector  are  included 
for  corniileteness.  llie  actual  logic  for  generating  diagnoses  is  not 
included  as  it  is  not  employed  during  the  sequencing  of  statements. 

Tlic  variables  are  classified  as  global,  local,  source  and  target.  The 
report  whicl^  is  generated  by  setting  "SEQOPT"  to  1 or  2 when  invoking 
the  NOPAL  processor^  is  a comprehensive  summar>"  of  tlie  sequenced  test 
module. 
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SEQUEN'CL  OF  PROCESSING  FOR  TEST  SYSTESTOOOS 


SEQUENCE  OF  PROCESSING  REPORT  FOR  TEST  NODULE  IN  FIGURE  2.2 

FIGURE  7.4. 
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APl’iiNIUX  A 


A1  COMl’UrUR  PROGIWK  FOR  INTRA  TliST  SliQUliNCING:  INTRODlJCTIfN 

The  dia^rajn  below  (Fifjurc  Al)  illustrates  the  orRJinization  of  computer 
programs  used  to  implement  intra-test  sequencing.  The  top  ixjrtion  of  the 
diagnun  is  the  iiuiin  procedui'e  which  issues  the  control  logic  to  invoke 
specific  modules  perfomiing  imique  sequencing  functions.  The  bottom  ix)rtion 
of  the  diagram  presents  three  separate  boxes  each  performing  tasks  used  in 
this  phase  and  shared  by  other  pluises  of  the  NOPAI.  processor.  Together  the 
top  and  bottom  portions  constitute  the  five  phases  of  intra-test  sequencing. 

The  objective  of  each  box  is  written  in  the  first  line  followed  by  the 
corresponding  comj^uter  program  nanK's.  Bach  program  name  is  surrounded  by 
double  quotes  to  easily  distinguish  tlieir  presence  in  the  diagram.  This 
diagram  arrangement  is  functionally  similar  to  the  center  partition  of  the 
NOPAL  Processor  Diagrajn  showing  Intra  Test  Aiialysis  (Figure  1.2).  IVhile  both 
include  functional  perfornumce  at  each  phase,  Piagram  Al  is  more  comiirehensivc. 
Also  stating  those  comi')uter  programs  responsible  for  the  implementation. 

The  box  labelled  "INTSEQ"  is  the  main  control  procedure  of  the  process. 

It  contains  sub-procedures  that  are  exclusively  used  for  intra  test 
sequencing,  lliree  procedures,  "WAVI-RIRM  LOAPBR","niAG  LOADER*  and  'TDCATE” 
exclusively  construct  the  adjacency  iwitrix.  Together  they  arc  shown 
in  the  first  box  in  Diagram  A-1,  which  corresponds  to  the  first  box  of  the 
center  partition  of  Diagram  1.2.  "WAVl'.FORM  LOADER"  retrieves 
conjunctions  and  assertions  from  the  associative  iromory  to  collect  a list 
of  variables  used.  "DIAG  LOADliR"  retrieves  diagnoses  from  the  associative 
memory,  al.so  collecting  a list  of  variables  used.  Roth  of  these  programs 
rely  upon  "LOGAIT."  to  eliminate  rcdund;uU  entries  to  produce  a comiilctc 
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list  of  variables  used  in  the  test  module  entries. 

Tlx;  preliminary  analysis  of  the  Adjacency  Matrix  is  located  in 
i the  second  box  of  Diagram  Al.  It  employs  the  computer  program  "CHEQ(" 

and  "LOOK”  to  accomjilish  its  analysis.  The  third  box  performs  the 
transformation  of  the  Adjacency  Matrix  to  that  of  a path  matrix.  It 
employs  the  computer  program  "CRPATH".  Directly  below  the  third  box, 
the  computer  program  "CYCLES"  identifies  the  nodes  or  statements  that 
, are  circularly  defined,  'fhe  fifth  box  located  at  the  bottom  of  the  page 

I 

I performs  the  actual  sequencing  of  statements  within  the  test  module. 

The  computer  program  'PRECEED'  performs  this  function. 

All  reports  arc  issued  from  within  the  main  procedure  'INTSEQ'. 
Included  are  the  Adjacency  Matrix  Report  and  the  Flowchart  Report 
shown  on  in  the  right  portion  of  the  box.  Specifically  computer  pro- 
grams "MATRIX  PRIN'r"  and  'SYM_PRIW  produce  the  Adjacency  Matrix 
Report;  and  the  computer  program  "PR_SEQ"  produces  the  Flowchart  Report. 

The  preliminary  analysis  of  the  adjacency  matrix  produces  error 
listings  directly  from  procedures  "Check"  and  "Look”  tSox  ^2 j . 

A special  index  follows  (Figure  A2)  linking  the  functional  des- 
cription to  respective  prograjn  modules.  It  is  a quick  summary  to  help 
tine  user  locate  the  page  number  of  a specific  computer  program. 
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INTSEO:  PROC(Be;GIn)  I 
/••*  unicolu  version  ♦*•/ 

/•THIS  PROCEDUHE  CREATES  THE  ADJACENCY  riATRlX  USED  FOR 

intra  module  sequencing,  the  actual  matrix  is  a controlled 

VARIABLE  STRUCTURE:  THUS  OPTIMIZING  ON  THE  SYSTEM  MEMORY. 

IT  begins  by  counting  the  number  of  WAVEFORMS  <BOTh  STIMULI 
AND  measurement ) tVARIABLEsIBOTH  SOURCE  AND  TARGET),  AND 

diagnoses  to  determine  the  size  OF  the  matrix. 

ONCE  THE  adjacency  MATRIX  IS  CONSTRUCTED,  ERROR  DETECTION  AnD 

internal  Sequencing  follow.. 

there  are  three  new  data  structures.  THEY  ARE  'A*. ’HOMER* , AND 

A -A  COfJTKOLLED  STRUCTURE  WHOSE  SIZE  IS  DETERMINED  BY  SUM  TOTAL 
OF  THE  number  of  Q I AG • S , V AR I ARLES , AMD  WAVEFORMS. 

HOMER-  A controlled  STRUCTURE  THAT  POINTS  BACK  TO  THE 

DIRECTORY  (KCYNODE).  THIS  ENABLES  EVERY  ADDRESS  IN  A THE 

ability  To  Trace  back  to  its  storage  entry  in  the  directory, 

VAR-A  controlled  STRUCTURE  UsED  TO  COLLECT  ALL  SOURCE  ATJO  TARGET 
references.  THE  FIRST  COLUMN  INDICATES  'SOURCE* J 

TttE  SECOND  Indicates  *targei>.  the  first  row 
OF  BOTH  Columns  stores  the  number  of  variables  placed 
IM  Each  column. 

0IA6-A  controlled  STRUCTURE  UsED  TO  COLLECT  ALL  DIAGNOSE 

rlkekences.  the  first  row  Indicates  the  number  of  diag  lbls. 


OCL  1 symbol!  200  ) EXT,  /•  2-TABLE  DIRECTOR  •/ 

2 keyname  CHaR(  12  ) VAR, 

(2  UP,  2 DOWN.  2 TYPLIST)  FIXED  BIN: 

DCL  1 KEYNOOEI  300  ) EXT, 

(2  KEYTYPE,  2 TYPLINK,  2 NEXTYPE,  2 HOME)  FIXED  BIN, 

2 REFLIST  PTr; 

OCL  1 STORAGE-ENTRY  BASED  (ST0_PTR)  , 

2 DATA  PTH,  2 WnEYs  FIXED  BIN,  i 

2 KEyENTRy  In  refer  (UKEYS)),  ■ 1 

3 name  fixed  bin,  3 NEXT  PTR;  i 

DCL  1 ANY  fiASED(DP)  . /*  INCLUDE  TaDLE-ENTRY  •/ 

(2  TYPE.  2 STMTW)  FIXED  BIN, 

(2  ALIAS,  2 ENTRY-SEOB)  FIXED  BIN, 

2 ftype  chAR(i ) : 

DCL  1 test  BASEdIDP)  , 

12  type,  2 STMTW)  FIXED  BIN, 

(2  STIH,  2 MEAS,  2 LOR)  PTR) 

OCL  1 waveforms  ALIGNED  BASEDIDP)  . 

12  Type,  2 stmtb)  fixed  bin,  j 

12  S_lIST.  2 T_LIST)  PTR, 

12  TEST-LrL,  2 BREF-LBL)  FIXED  BIN,  ] 

2 TRIPLET,  i 

3 POINTCR  PTR,  3 FLAG  BITII); 

DCL  1 WaVEFORMS.LEvEL  BASEDITP)  , 

2 WWAVEFOhMS  fixed  bin,  1 

2 ENTRYIN  REFERInWAvEFORMS) ) , i 

3 waveform  PTH.  3 LEVEL  FIXED  BIN!  j 

DCL  1 diagnosis  BASEDIDP)  , | 

12  Type,  2 STMTH)  FIXED  BIN. 
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2 USED  PTR. 


2  OP_MSG. 

3  AFFE:CTED_COriP  PTR.  3 OTHER-PaRMS  PTR. 

3 TYPE  fU^EO  bin. 

3 timing. 

4  value  dec  float.  4 OIM  CHAR(12), 

2 OP.RPS. 

3 VAR.PtR  PTR.  3 Y_N  CHARdU 
OCL  1 MsG_PARM  rASEO  (TP)  . 

2 UPARMS  fixed  OIN. 

2 PARM  (nC  REPER(MSG_PARM.BPAKMS) ) . 

3 type  fixed  bin,  3 PNTR  PTR) 

DCL  1 LOGIC  BASfO  { DP ) , 

(2  TYPE,  2 sTMts)  fixed  BIN. 

2 «entry  fixed  bin, 

2 entry  (NC  REFER(ttENTRY) ) , 

3 operator  rHAR(4)  , 

3 diag.lbl  fixed  bin: 

OCL  1 STIM_MEAS  BASED  (OP), 

(2  TYPE.  2 STMT«)  FIXED  6lN* 

2 WAVEFORMS-PTR  PTR; 

OCL  1 STR  BASED  (Tp)  , 

2 »char  fixed  Bin, 

2 text  CHAR(lS  refer  (STR.BCHAr)  ) ; 

OCL  PLACE  FIXED  Bls): 

DCL  1 LIST.VAL  bASED(TP)  , 

2 «VAL  FIXED  bin, 

2 VAL(N  RePER(LIST_VAL.UVAL) ) FIXED  BIN! 

OCL  1 LIST.PTR  dASeD(TP)  , 

2 «PTR  FIXED  PIN, 

2 ptR(N  Refer  (LisT.pTR.ilPTR) ) ptR; 

OCL  1 DCL  aligned  BASED(TP)  , 

2 10  FIXED  bin,  2 DESCRIPTOR  PTR, 

2 SCOPE  DtT(I),  2 link  PTR; 

OCL  1 IF.CELL  ALIOmED  based  (TP), 

(2  TRUE_PARt.  2 FALSE.PART)  PTR, 

2 CF  BIT(l),  2 aCHAR  FIXED  BIN. 

2 Condition  char(ls  kefer( if_clll.»char)  ) ; 

OCL  1 SIMPlE.CONJ  based  (TP). 

2 ptriplet  fixed  bin, 

2 triplet  (NO  REFER( aTRIPLET) ) , 

3 CDE  PTR,  3 RELATION  CHAR(l),  3 FoE  PTR! 

DCL  SA  FIXED  BIN  ExT!  /»  FOR  ALPHAMERIC  (=2)  */ 

DCL  NAMES{31)  C)iAR(  12  ) VAr  EXT! 

DCL  TYPES(3i)  FiXEd  PIN  EXT: 

OCL  (ST&_PTR.nP,TP,SP>  PTR  ! 

OCL  (SPECB,TESTii,STIMH,MEASft,DIAG«,MSG»,LOGIC«;,CONJ(!,ASRT«, 

COMPB,CMPFLu,DDTPTtt, ATEPTH,FUNC«,VAR«,EfJDF)  FIXED  BIN  EXT! 
DCL  RPTRS(  200  ) PTR; 

DCL  A(N,N)  BIT{1)  INI T ( ( N^N > ( * 0 ' ) ) CONTROLLED  !' 

OCL  P (M,W)  OlT(l)  CONTROLLED; 

OCL  0;IDER(N)  FIXED  EXT  COmTROlLEU; 

DCL  $STM(N)  CHAR(  12  ) VARYING  CONTROLLED! 

OCL  H0M.N0I)E(SX2E!  FIXED  BI/U  CONTROLLED; 

DCL  )(OM_PTR(SIZE)  PTR' CONTROLLED » 

OCL  VNODE(200)  fixed  BIN;  DCL  VPTR(200)  PTRI 
OCL  (ERR_CNT.N0_WARN!  FIXED  BIN  EXT! 
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OCL  (»V,«MEAS.HOlAG.HSTin,«WiN.SlZC:.HOH)  fixed  bin; 

DCL  SEQOPT  FIXED  BIN  tXT; 

DCL  DIAG(  200  ) PTR! 

DCL  (MtAS_CONJ.sTlM_CONJ)  FIXED  BIN  INlT(O); 
0CL(BEGlN,T_PTR.TP_LEVELtW_PTR.P3_rTR)  PTR; 

OCL  (TTF.TpH_LEvEL,TPS_LEvEL.NEW_VAR)  PTR! 

DCL  (TP_PARms«Tp_OPERATOR)  PTR! 

OCL  ( $NAMEtSCONJ,$ASRT.»DlAG)  CHAR(  12  ) VARYING! 

OCL  STYpE  CHAR(l5!  VARYING*SI  CHAptU)  VARYING* 

SORDER  CHAR((*)  VARYING,  SRANK  CHAR(4)  VARYING! 

OCL  (5MAT,$VAR,$TSt)  CHAR(12)  VARYING! 

OCL  (L1N1.LIN2,l1N3)  CHAR(90)  VARylNG! 

OCL  TEMP  PTR!  CCL  SVl  CHAR(60)  VARYING; 

DCL  TEN  FIXED  BlN! 

DCL  I.C  PICTURE  'O’; 

OCL  JT  PICTURE  '9* ; 

OCL  »U  CHAR(I)  INIT( •-• ) ! 

OCL  BLKl  ChAR(1)  INIT!'  •)! 

OCL  SEORPT  file  OUTPUT  PRINT  ENV«Fll31))i 
OCL  SEOERR  file  OyTPUT  PRINT  ENV(F(131))! 
open  file  (SEORpT),  FILE  (SEQEKR); 

5ASRT  = •assertion,;  $VA«  = •VARIABLE’! 

1.DIAG  = •diagnoses*:  SHAT  = • SUOScRPT.VAR  • i 
SCONJ  = •CONJUNCTION* i 


calculate  « OF  wveforms  and  store  variables  **/ 

ST0_PIR  = BEGIN;  DP,T_PTR  r DATA; 

$TST  = keyname (HOME! NAME(I) )) I 
(»STIH«AnEAS  = (3; 

CALL  WAvEFORM.LOADER  (’I’B)! 

/***  LOAD  DIAG  wITh  STORAGE  POINTERS  TO  DIAGNOSES  ***/ 
ST0-PTR=BEGIN!  DP=DATA! 

ST0_PTR=L0G!  DP=0ATA! 

IF  STO.PTR  r NULL  THEN  «DlAG=0! 

ELSE  «D1AG=lOGIc.AeNTRY! 

DO  I = 1 TO  «DIaG! 

TYPESI1)=NamE(DiAG_lBL(I) ) ! 

CALL  RETRCVS! • 0 • B . RPTRS . NR , DI AGS  I ! 

JIAG( I)=RPTRS(1»  ! 

END! 

/••  FOR  EACH  DIaG,  SAVE  OPERATOR  AND  OThER  PARMS  **/ 
CALL  D1AG_L0ADER( 'I'B) ! 

SIZE.N  = UDIAG  + »V  + OSTIM  + AMEaS ! 
allocate  HOM_NOnE,H0N-PTR. Ai 
HOM.NODE  = 0! 

COUNT  = ASTIM  + ChEAS  -f  ADIAG!  Ar'O'B! 


i 
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/••  MOVL  temp  VAKJABLCS  to  homer  *•/ 

DO  1=1  TO  HVi 
COUMT  r COUNT  +1 ; 

HO«_nODE(CoUMT)  = VNOOE(l); 

HOH_PTR( COUNT)  = VPTR(I)i 
end; 

H0M=  "STIM  HMeAS  + ffOIAGi 
COUNT. STIM_CONJ,rtEttS_CUNJ  = O: 

/•»  LOAD  HOMER  mITh  k/AVEFoRMS,  AND  'A*  WITH  VARIABLES  *»/ 
CALL  WAVEFORM.LoADeR; ’P’B) ; 

/♦•LOAD  homer  with  DIAG  ♦•/ 

CALL  DIAG_LOADEr( ’u'B) : 

= KSTIM  ♦ «HeAS; 

ALLOCATE  $SYM; 

IF  SEOOPT  = 1 then  call  MATR I X_PR INT ; 

else  call  sym-PriNt: 

CALL  Check; 


/♦♦  detect  errors  and  sequence  *♦/ 

/*»«•*«  CALL  internal  code  GEWERATIoN  BEFORE  RETURNING  *•****•*•*•••/ 

/•♦  create  PATH  MATRIX  ♦•/ 

ALLOCATE  P;  CALL  CRPATHS  (A.P.N); 

/♦»  CHECK  diagonal  FOR  CYCLES  ♦♦/ 

DO  1=1  TO  Nl 
IF  p(i.i)  = u'B  Then 

DOS  CALL  CYClES(A.P,N,5SYM) ; 

returns 

ENS)S 

end: 

/♦»  precedence  *♦/ 

ALLOCATE  ORDER:  Call  PREcEEO ( A , UROER , N ) ; 

IF  SEQOPT  <=2  then  call  PR.SEQroROER, iSYM.N) s 
FREE  A.HOM_NOOE,HOM_PTR.iSYM.p: 
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WAVEFORM-LOADER;  pROC(SWITCHn 

THIS  procedure  will  EXAMINE  All  waveforms. 

IF  •SWITCH*  IS  SET  TO  'O'.  ALL  NEW  SOURCE  A^D 
TARGET  VARIQLES  ARE  ItJSERTEO  TO  ThE  TEMPORARY 
VARIABLE  LIST.  IF  SWITCH  IS  SET  Tq  •!•  THE  WAVEFoRM 
STORAGE  pointer  IS  LOADED  TO  •HOMeR*.  A^D  ALL 
LOCATIONS  IN  THE  ADJACENCY  MATRIX  ARE  SET...*/ 


OCL  SWITCH  BIT(i){ 

COUNT  = o; 

OP  = T_PTR; 

DO  1=1  TO  2; 

IF  1=1  THEN  SToIPTr  = T_PTR->TEST . ST IM « 

ELSE  STO.PTR  = T-PTR->TEST . ME AS  5 

IF  STO_PTR  = nuLL  THEfg  GOTO  BADt 

DP  = data;  /*  follow  to  stim  and  MEAS  */ 

TP  = WAVEFORMS.pTR; 

IF  1=1  then  «STiM  = wwaveforms: 

ELSE  »mEAS  = WWaVCFORMS: 

TTP  = Tp; 

DO  J=1  TO  oWaVEFORMS: 

STO.PTR  = TTp->WAVEFOKMS_LEV&L.WAVEFORMt J» : 

W-ptr,dp  = data? 

IF  -•SWITCH  Then  /♦*STIM  or  HEAS  CONJ  wot  NULL  •*/ 

Do;  COUNT  = COUNT  +1; 

HOM-PTR ( Count )=sto.ptr; 

hom_node(count)=o; 

IF  ANY. type  1=  COMJS  THEN  DOTO  BY: 

IF  J=l  S 1=1  THEN  STIM_C0NJ=C0UWT : 

IF  J = 1 S 1 = 2 THEM  nEAS_CO.-J  = COUNT; 

end; 

by; 

IF  J=2  » 1=2  THEN  IF  STIM-Cotgj  >0  S 

HEAS.CONJ  >0  then  A(STIM_C0nj,MEAS_C0NJ»  = 'I'B; 

UO  K = 1,2  I 

IF  K=1  then  TP=W.PTR->VAVEFoRMS.S,lIST; 

ELSE  TP  = W_pTR->MavEF0RMS.T_LIS7; 

Do  whilE  (tp-‘=null)  ; 
node  = nahecocl. ID) ; 

Place  = loc ate; node. tp, switch ) ; 

IF  --SWITCH  then  if  K = 1 ThEN  A I PL  ACE  , COUNT  ) = • 1 • B: 
IF  -iswiTch  Then  if  k=2  Then  account, placE)  = 'i'b; 
TP=L1Nk5 
End: 

end; 

END! 

BAD: 

CNO; 

END  WAVEFORn-LOAOER; 
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diag_loadek:  pkocjSwitch); 

/*•  THIS  procedure  will  EXAMINC  All  OIAgwOSES. 

IF  SWITCH  IS  set  To  •O'*  ALL  NEW  DIAGNOSES'  VARIABLES 
ARE  IWSERTLD  TO  THf  TEMPORARY  VARIABLE  LIST.  IF 
SWITCH  IS  SET  TO  '1'.  THE  DIAGNOSES  STORAGE  POINTER 
IS  LOADED  TO  homer,  AND  ALL  LOCATIONS  IN  THE  ADJACENCY 
MATRIX  ARE  SET */ 


DCL  SWITCH  iTIT(l)  : 

COUNT  = mstIM  ♦ ItMEASI 
00  1=1  TO  «0IAG; 

STO.PIR  = DIAG(I);  OP  = data? 

IF  -^SWITCH  then 

do;  count  = COUNT  ♦ II 
HOrt-PTK( COUNT)  = STo.PTRl 

H0H_N0DC (COUNT)  = 01 

end; 

DO  J = 1,2  : 

IF  J=1  then  TP=OThER_PARMS; 

ELSE  TP  = 0P_RPS.VAK_PTR; 

IF  J=1  THEN  OTHER  PARMS  ( 

Du  K = l TO  FPARMS  while  (TP‘’=NULL); 

IF  MSG_PArM* type ( K ) =iA  THEN 

jo; 

SP  = MSO-PARM.PrnR(K)  : 

node  = name  (SP-^-UCL.  ID)  ; 

PLACE  = LOCATE  ( NODE , SP ' SW I TCH ) ; 

IF  -*SWiTCH  then  AIPLACEiCOUNT)  = 'I'D; 

end; 

LNO; 

IF  J=2  then  /**  operator  RESPONSE  **/ 

DO  while  ( TP-.=NULL  ) ; 
node  = NAMLIOCL.ID) ; 

PLACL  = locate  (NODEiTP, SWITCH)  ; 

IF  iSwiTCh  then  account. PLACE)  = 'I'Bl 
TP  = LINK; 

end; 

END! 

END; 

end  OIAG-LOADER; 


locate:  PKOCEDURE  (NEW_VaR«NEWiOPT10»<)  RETUR^S  (FIXED  8IN)( 

THIS  Procedure  will  locate  the  position  of  a variable  in 
EITHER  •homer*  qR  'VAR*.  'VAR*  IS  USED  TO  DCRTMINE  THE  ACTUAL 

number  of  Unique  vahiaules*.  once  this  has  been  determined 

•HOHER*  is  OTNaMICM  LY  allocated  WITH  THAT  EXACT  NUMBER. 
THUS  The  procedure  has  TWO  ABILITIESI  ONE  TO  SEARCH  ThE 
temporary  variable  LIST.  AND  AOU  NEW  VARIABLES  AS  THEY 
CONE,  ANn(2)  TO  search  THE  FINAL  VARIABLE  LIST  'HOMER* 

AND  RETURN  ITS  pOSiTON  SO  THAT  IT  MIGHT  BE  ADDED  TO  THE 
adjacency  MATRIX.  THE  FOLLOWING  CoCE  ALTHOUGH  SHORT  WAS 
developed  into  its  own  PROCEOLIKE  BECAUSE  ITS  BASICLY 

iniatls  a search  Checking  for  both  simple  and  complex 

VARIABLES. 

INPUT  Parameters: 

NEW_VAR  - STo-FTR  TO  VARIABLE  NAME 
TP  - TP  POINTER  TO  OCL 

OPTION  - IF  *0.  WILL  SEARCH  'HOMER*  AND  RETURN  POsITON 
IF  *1*  WIEE  SEARCH  ’VAR*  AND  INSERT  IP  NEW 

♦ ***»»•♦♦*»*♦»*♦**•******♦**♦■■*♦****♦**«»*»****♦•*******/ 

OCL  (TP_OLD,TP_nEW.OLO_SP,NEW_SP,NEN,OLD)  ptr« 

OCL  (K.NEW.VAR. temp, MAX)  FIXED  BlNl 
OCL  OPTION  UIT(l):  MAX=Oi 

DO  L = 1 To  «v; 

MAX  = L; 

IF  OPTION  then  tEMP  = VNODE(L)» 

EESC  TEMP  = HOM_NUDE(HOM  *•  L)! 

IF  NEW. VAR  -,=  Temp  then  GOTO  END-L; 

IF  OPTION  then  DLO  = VPTR(L)I 
ELSE  OLD  = H0M_pTR(H0M  + l)I 

/•»  CHECK  For  simple  vJIRIABLE  •*/ 

IF  NEW->UCL. descriptor  = NULL  S 
0LU->Dcl. DESCRIPTOR  = NULL 
then  goto  MflTCHl 

/••  check  That  both  are  arrays 

IF  NEW->L)CL.UESCR1I’T0R  ■.=  NULL  S 
CLD->OCL. DESCRIPTOR  ->=  NULL  IhEN 

OUC  check  that  subscripts  match  *♦•/ 

TP.OLD  = OLo->DCL. DESCRIPTOR! 

TP.NEW  = NEW-X'CL.OESCPIPTORI 
IF  TP_NEW->LIST_PTR.«PTK  -.5 

TP_OLO->LIST_PTR.rPTR  THEN  GOTC  INSERT: 

Do  M = 1 TO  TP_NEW->I.IST_nTR.«PTP: 

OLD.SP  = TP_0L0->L IST_PTR.PTH(M) I 
NEW.SP  = TP-NEW->LIST_PTR.PTRtM» ( 

IF  OLr)-SP->STR.TEXT  ->=  NCW_SP->STR  . TEXT 
then  goto  INSERT; 

EnO»  /•♦  END  M = 1 TO  II  PTR  .»/ 

GOTO  match; 

EWii!  /*♦  END  Both  arrays 

else  goto  IIVSEl^Tl 

cnd.l:  enoj 
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INSERT":  IF  option  THEN  /•  INSERT  •/ 

UO«  «V  = «V  ♦ II  VNODE(«V)  - NEW.VAr; 

VPTR(«V)  = NfW;  RETURN(«V)I 
end: 

else,  call  SYsERR  I'SEArCHEP  variable  fJOT  IN 
flATCH:  HAXrHAX  ♦ HOM|  RETURN  («AX)|  ^ ^ ” 

END  LOCATE! 

check:  PKOCI 


THIS  PROCEDURE  u/ILl  EXAMINE  THE  ADJACENCY  MATRIX  FOR; 
1)  MORE  then  1 TARGET  PER  ASSERTION 

?)  Multiple  defined  targets 
3)  Invalid  leet  hand  expressions 
H)  invalid  operators 


/***  multiple  declarations  of  target  ♦••/ 

HOni  = HOM  +11 


DO  I=HOMl  TO  Nl 
LINl  =-”S  «E  = 0j 


DO  J=1  TO  hom; 

IF  AIJ.I)  = il'B  THEN  . 

Do;  ttE=«C  +1; 

/**  STORE  waveforms  •*/ 

LINI  = LlMl  M SSYM( J)  II  • . • I 

END  I 


END! 

IF  ME  >1  Then 

do;  I?  = LENGTH(LINI  ) I LINlr.SUBSTR(LINl.lil2-l)  l 

PUT  file  (seoerR)  edit 

(••warning  (PDSSIOLE  AMBIGUITY):  VARIABLE  • II  HSYMd) 
I I • of  test  • I I JTST  11*  . • 

II'  IvS  defined  more  than  once  in  • II  LINI 
M*.  They  Must  be  exclusive  .•)  (skip,aii 

NO.WARN  = NO_WArN  + 11 

end; 

END! 

/•••  MORE  then  t TARGET  IN  ASSERIIOD  ♦••/ 

DO  1=1  TO  MW! 

LIN1='*I 

STO_PlR  = H0M_PTR<I);  DP=DATA!  mE=0I 
if  waveforms. type  -.=  ASRTM  THEN  GOTO  nO_ASRT«iI 

DO  J=MOMl  TO  Nl 

IF  AII.J)  = 'I'B  then 

001  «E  = ME  -Lll 

LINI  = LlNl  I I SSYM( Jl  I I • . • I 
LNOi 

END  I 
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IF  BE  >i  Then 

DOI  IZslENGTHILINI ) J L IN1  = SUBSTR ( L INI  * 1 1 lZ-1 ) I 
PUT  file  (SEflERR)  EDIT 

t**EKROR  (AMBIGUITY):  IN  ASSERTION  • I I $SYM(I) 

II'  OF  TEST  • I I S.TST  11*.  THERE  ARE  TWO  OR  MORE* 

II'  target  variables:  • mlind  (skip, ah 

ERK_CNT  = ERR_CNT  ♦ 15 
END! 

/•**  examine  left  expression  AtJD  OPERATOR  ***/ 

SP=P0INTER;  if  «E  >0  THEN 

DOS  IF  triplet. FLAG  = ‘O'B  THEN  CALL  LOOK(SP)| 

ELSE  do; 

COND;  CALL  LOOK ( SP-> IF-CELL . TRUE_PART  ) I 
IF  SP->IF  CElL.CF=’1'B  then 

Do;  SP=SP->IF_CElL,FALSE_PART;  GOTO  CONDI 

end; 

else  if  SP->IF_CELL.FALSE_PART  •>=  null  then 
CALL  LOOK  (SP->IF_CEUL.FALSE_PART) ; 

end; 

ENU ; 

NO_ASKT»:  end;' 


look:  procedure(tehp) ; 

DCL  (TEMP.SPP)  PTRl 

OCL  1 SIMPLE-ASRT  based  (TEMP), 

2 relational* 

3 EXPR(2)  PTr,  3 operator  ChAR(2), 

2 Range, 

3 EXP  PTR,  3 PCNT  CHAR(1); 

spp  = ExPR(i);  lIni="i  #E=o; 

DO  J=H0M1  TO  N; 

IF  A(*,J)=*1*B  then 

do;  if  SPP->sTR.TEXT=$sTn( J)  then  GOTO  OPER; 

AE=ttE  +H 

IF  «E  = 1 then  LIN1=$SYM{ J) ; 

end; 

END ; 

I 

PUT  FlLE(SEOERR)  EDIT 

(••ERROR  (AMBIGUITY):  EXPRESSION  ' 11  Spp->STR . TEXT 
11*  PRECEEDING  tHE  ••=••  JN  ASSERTION  • |I  $STM(I) 

I I * O'-  test  • II  STST  II  • DOES  NOT  MATCH  THE  TARGET  VARIABLE  ' 

II  LINl)  (SKIP, A); 

ERR-CNT  = ERR-CnT  + 11 

OPER:  if  SIMPlE-AsRT. OPERATOR  ->=  • = • then 
do;  simf'le.asRt  .operator  = * = •; 

PUT  FILE  (SEoEPR)  EDIT 

('•warning  (inconsistency):  in  assertion  ' II  SSYM(I) 

II'  of  Test  • n stst  ii*,  a variable  is  declared  as* 

II*  target;  but  the  relation  operator  Is  not  an  equal  sign.* 
11*  replaced  By  an  equal  sign.*)  (S|<ip,A); 

NO-WARN  = NO.WArn  1 1 
END; 


END  look; 

END  check; 
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MATRlX.fKINT:  PROC » 


STO.PTK  = BEGIN! 

PUT  FILE(SEQRPT»  PAGE! 

PUT  PILE(SEORPT)  EDIT  I'lNTRA  MODULE  SEQUENCING  • II  STSTt 
•ANALYSIS  OF  THE  ADJACENCY  MATRIX*) 

(SK1P(5)  ,COL(26)  .A.sKlPdl  ,C0L(26)  ,A,SKIp(3)  ) I 
IF  N<1  then  RETuKNj 
LIN1.LIN2.LIN3  = * • I 

IF  N>9*l  THEN 

DO!  /♦*TO  BiG  TO  PRINT  •*/ 

PUT  FILE  (SEqRPT)  EDIT  ('ERROR:  ATTEMPT  TO  WRITE  MATRIX  • 

I I ’WHOSE  SIZE  exceeds  MAXIMUM  »J  OF  94.  THE  SAME  INFORMATION 

I I 'Is  available  in  the  internal  sequencing  report  which  does 

II*  not  have  a size  limit*)  (Skip. a. SKIP) I 

RETURN! 

END! 


IF  N<‘*7  then  B=2i  ELSE  B = 1 1 . ' 

COUNT=0;  TEN  = 0! 

DO  1=1  TO  N! 

COUNT  = COUNT  ♦ 1| 

IF  COUNT  = 10  Then 

DO!  count  = o!  TEN  = TEN  + 1! 

END! 

SC  = COUNT!  ST  = TEN! 

IF  KIO  THEN  LINl  = LINl  I I BLKII 
ELSE  l-lNi  = LINl  I I ST! 

LIM2  = LIN2  II  $C! 

LIM3  = LIN3  II  sU! 

IF  N<'*7  THEN 

DO!  LINl  = LlNl  I I OLKl! 

LIN2  = LIN2  I I BLKl! 

LIN3  = LIN3  I I BLKl! 

END! 

END! 

IF  N>^  then  put  file  (SEQRPT)  EDIT  (LINl)  ( COL ( 35 ) . A . SKIP  I I 
PUT  file  (SEQRPT)  EDIT  (LIN2i  ( COL ( 35 ) . A . SK I P ) ! 

PUT  file  (SEQRPT)  EDIT  (LIN3)  ( COL ( 35 ) . A . SKI P ) ! 

CALL  SYM.PRINT! 

END  MATRIX.PRINTI 


SYM.PRINT:  PROCEDURE! 

/•••  print  names  And  save  theh  for  •check*  procedure  .*►/ 

DO  I = 1 TO  Ni 
IF  HOM_)^OOE(I)  > n Then 

001  SNAME  = kEYNAME(HOME(HOM-NODE( I ) ) ) i 
STYPE  = SVARj  TP  = HOM-PTR  (I)! 

IF  descriptor  = null  Then  goto  pnt! 


/•*  SUBSCRIPtEO  variable 

TEnP  = descriptor;  *VI  = SNAMES 

OO  J = 1 TO  TEMP->LIST_PTR.#PTR« 

SP  = TEMP->LiST_PTR,PTK( J) ? 

IF  J=1  then  $V1  = $V1  II  M*  II  Sp->STR.TEXT|  ELSE 

svi  = $vi  M • 1*  II  ■sp->str.texti 
END! 


SNAME  = $V1  II  • I ' 1 
GOTO  pnt; 

END  I 


ST0_PTR  = HOM_PtR(I)5  OP=OATAj  STYPE  = 'ERROR*; 


IF  ANT. TYPE  = ASKT«  THEN  $TYPE  = SASRTI 

IF  ANT, TYPE  = C0NJ«  THEN  sTYPE  = SCONJ; 

IF  ANY. TYPE  = OlAGtt  THEN  sTYPE  = SDIAGI 

SNAME  = KEYNAMElHOHEINAMEd)  ) ) : 

pnt;  if  seqopt  = i then 

PUT  FILE(SEQRPT)  EDIT  ( I . SNAME . $T YPE . ( A ( I , J I 00  J = 1 TO  Ml) 
(C0L<2) .FlA) .COLiai , A,C0L(22) , A . COL  < 36 1 , I M ) A t D ) ) ; 

SSYMII)  = SNAME; 

end; 

END  SYM. print; 


PR-SEO:  PROC  (ORDeR.DICT.N) I 

DCL  CAT  ENTRY  I CHaR I * ) . F I XEd  BIN.  FIXED  BIN)  RED, 

CON  ENTRYIFIXED  niN. fixed  BINIRED  I 
/•*  PROCEDURE  TO  PRlNy  SEQUENCING  ••/ 

DCL  (IORDER, IRANK)  fixed  bin  INITIO) I 
DCL  MOUT  FIXED  rIN  INITIO)! 
nCL  KETWD  CHARI5I  VARYING! 

OCL  FLOATMX  FLOAT  lNlTllE+75)  STATIC, 

LTEHP  FIXED  bin,  TENP  CHARITO  ) VAR  INITI*'), 

CURTXT  CHARIlVn)  VAR  INITI**), 
semicolon  CHAR(1)  INITI*;*), 

LPAR  CHARII)  INITI'I*),  RPAR  CHaR I 1 ) INITI*)*), 

COLON  CHARI  1)  INITI’.**),  COMMA  ChARI2)  INITI*,  •), 

BLANKS  CHARI70)  IMTII70)*  '),  TaG  B1T|i), 

0RDER(»)  fixed  bin,  OICTI*)  CHARI12)  VARYING, 

RANKIN)  FIXED  rIN  EXT  CONTROLLED,  PARCmA  CHARI3)  INlTI')*  •), 
B1  CHARII)  INITI*  *),  SKP  FIXED  iNlTIDl 

DCL  1 simple_asrt  based  ITP), 

2 relational, 

3 EXPRI2)  PTR,  3 OPERATOft  CHAR|2), 

2 range, 

3 LXP  PTR,  3 PCNT  CHARID! 

OCL  1 CONNECTORS  BASED  ITP), 

2 DIN  CMARI12), 

2 ttPTS  FIXED  BIN, 

2 POINTS  INP  REfERICONNECTOKS.HPTS) ) FIXED  BIN; 

DCl  1 AFFtCTED.COMP  BASEDiTP), 

2 ANO.OR  CHARII),?  bCOMPS  FIXED  BIN, 

2 element  INC  refer  IACOMPS)), 

13  C0MP_fl»,  3 COMP_ID,  3 FAlL.FN)  FiXED  BIN! 


f 

1 


y 

I 
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IF  SEOOPT  = 2 then  PUT  FILE(SEQRPT)  PAGEi 

PUT  FILE  (SEORPT)  F D I T ( • SE QUENCE  OF  PROCESSING  • II 
•FOR  TEST  *11  STST)  ( Sk I P ( 3 ) . COL ( ?6 ) • A . SK IP ( 2 ) I I 
PUT  FILE  (SEQRPTI  CO I T I ' OROER • • • VEC T • , • ORDER • • • R ANK • . » NAME • * 
•type ' , •TEXT^ , • INOCX^ , 'VECTORS ) 
«COL(l)tA.SKIP(i),cOL(lltA.C0L(7).A.C0L(15),A,COL(27). 
AiCOL(‘*H)»A*COL(70)iA,SKIP(1)«COL(1I  t A*C0L(  7 I « A.  SKIP  (2)  ) I 

DO  M=1  TO  Nl 

1=0RDER(M);  /»*  I IS  the  matrix  node  being  examined  *•/ 

IF  HOM_NODE(I)  >0  THEN  CALL  VAR_PT:  ELSE 

DO;  /»*  waveforms  OR  diagnoses  ***/ 
sto_ptr=hom_ptR <1 ) ; dp=data;  $type=»error^ ; 
lOKOER  = l;  iRAnk  = RANKII); 

SNAME  = DICTIIli  H0M1=  «W  ♦ MOlAG  -fl; 

IF  ANY. TYPE  = OlAGft  THEN'CAtL  UIAG.pT;  ELSE  CALL  WFORH.pT; 
IF  LTLMP  >0  I (LCNGTHCSNANE) ) >0  THEN  CALL  CON»0,21; 

END;  /*♦  END  waveform  OR  DIAGNOSES  **•/ 

CALL  COn(0,2)  ; 

FNO;  /•♦  END  M ItFRATION  *♦*/ 

var«pt:  PROC; 


tp=hom_ptr(I) ; s.T=o;  line=^*i 
IF  DESCRIPTOk=NULL  then  stype=$var; 

ELSE  $TYPE=SMATI 

IF  ISCOPE  THEN  TEMP= • LOCAL • I 
ELSE 

do;  /**  global  •*/ 

DO  K=1  to  »w; 

IF  AIK, I)  THEN  T=T*1; 

ENOI 

TEMP=^GL0BAL  /• ; 

IF  T >0  THEN  TEMP=TEMP  !!•  TARGET  /•; 

ELSE  temp=t.enp  11  * SOURCE  /•; 

END; 

PUT  FILE  (SECRPT)  ED  IT ( M . I , R ANk ( I ) . D ICT ( I ) . STYPE • TEMP ) 
(SKIPtCOLIl)  ,F(4)  ,C0L(71  .F(i»)  iCOLim;  .F(4)i 
C0L(26)  , A.COl;**!)  •A.COLISO)  lA)  ; 

STYPE.TEMPs^ • I 

end  var_pt; 

diag.pt:  PROC; 

SKP,NB.K=i;  $type=soiag; 

TP  = OP_MSG. AFFECTED.COMP; 

IF  IP-1  = NULL  Then  /*  affected  components  */ 

do;  call  cat ( •affected  components  =^iO«o); 

KEYWD  = AN(1_OR  II  Bi; 
do  L = 1 TO  (/COMPS; 

kf  = fail-fnili;  curtxt  = keynamechOmeicomp.id/l  1 1 > ; 

IF  kF>0D  then  CURTXT  = KEYNAME  ( HOflE  ( KF  ))  1 I lPAR  I I CURTXT 

II  RPAR; 

curtxt  = CURTXT  II  KEYWD;  CALL  CONlli  0); 

end; 

SUBSTRITEMp,  LTEMP  - 1)  = COMMA; 

END; 
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b TP  = othe:r_parmsi 

IF  TP-i=nuLL  them  /»  OTHER  PARAMETERS  */ 

00«  CALL  CAT( 'OTHER  PaKAME TCKS= « ' « 0 « 0)1 
DO  L=1  TO  HS6_PARM.ttPARMS; 

SP=mS6_pARM.PNTR(L) « 

IF  hsg_parm.type(L)-'=$a  then 
Call  caT(sp->sth.text  m comma, o«o)j 
end; 

00  L=«w  TO  N< 

CURTXT=dICT (L ) II  COMMAS 
IF  A(U,I)  THEN  CALL  COtJ(O,0)l 

end; 

TEMP  = SUBSTRITEMP,  1,  LTEMP-2)  II  PARCmAs 

EMUt 

IF  OP«MSG.TYPC>0  THEN  /*  OP.  MSG.  TYPE  •/ 

Du;  CURTXT='TyPE  = • I IKEYNAME(HoME|NAKE(OP_MSG.TyPC) ) ) II  COMMAS 
CALL  CON(i,0)S 

ENDS 

IF  TIMING. VALuE<FL0ATMX  THEN  /•  TIMING  •/ 


call  CATI'TIME='  I ITIMING.VAlUE  II  COMMA, 0,0) I 
TP  = OP_RPS.VaK-PTRS 

IF  TPisMULL  Then  /♦  OP.  RtsP.  VARS  */ 

DOS  call  CAt< •RESP0NSE=( • , 1 , 0)1 
DO  L=  HOMI  to  NI 
IF  AII«L)  THEN 

DO$  CURTXT  = DICTIL)  I I COMMAS  CALL  CON(1,0)S  ENDS 
ENOS 

temp  = SUBSTRITEMP, l.LTEMp-2)  t|  PARCMAS 

END  I 

IF  0P_RPS.Y_N-.=8l  THEN  /*  Y/N  •/ 

CALL  CAT( 'RESPONSE  = • II  0P_KPS.Y_N  II  COMMA, 1 ,0)1 
LTEMH=LENGTHItEMP) S 

TEMP=SUBSTR(TEMP,1,LTEHP-2I  II  semicolons 
end  DIAG-PTS 

wform_pt:  procs  ’ 

TP  = waveforms. pointers  tag  =-FLAG5  stype  ? waveforms. type; 

SKP,NB,KF=i;  K=lBs 

IF  sTYPE=coNJe  then  stype=$conj;  else  stype=*asrts 
IF  -ITAG  THCN  call  sII'IPLEITP,  NB  ) ; /♦SIMPLE  CONJ/ASRT#/ 

ELSE  /*  CONDITIONAL  COMJ/ASRT  ♦/ 

DOS  COiMD;  CALL  CAT('IF  • I I COl«iD  I T I ON  I I * THEN  '.NB.OIS 
tag  = IF-CeLL.CFS 

call  SIMPLE(TRUE_PART«  MB+H)S  TP  = FALSE-PARTS 
IF  TAG  THEN 

DO;  CALL  CaTCELSE  '.NB.DS 

IF  NB>KF  then  DOS  NB  = SKP 5 K = IS  ENOS 

Else  dos  nb  = nb  ♦ ss  k = 05  ends 

GOTO  CONDS 

ENOS 

IF  TP-.=NUlL  then  /♦  erle=>  simple  conj.  ♦/ 

DOS  CALL  CaTI'ELSE  '«  NB,  1)S 
CALL  SIMPLEITP,  NB  + 4)8 

ENDS 

Enos  curtxt=' target:  's 


I 

1 


J 
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IF  T_LIST  -=NULL  ThEN 

do;  call  CAK'TARGET:  ‘tSKRtl)! 

00  l=homi  to  n; 

IK  A<1,L)  then 

DO;  CUrTXT=DICTIL)  11  comma;  call  CON{ltO)5  END; 
End  I 

SUBSTR«TEMP,LTEmP-1 

ENO; 

IF  S_L1ST  ->=  NULL  THEN 

do;  call  cATi'SOuucE:  '.skp.d; 

00  L=  HOMI  TO  N; 

IF  A(L«1)  then 

do;  CukTXT  = 01CT  (L»  ’ll  comma;  call  C.ON(I»0)5  ENO; 

end: 

end; 

SUHSTHITEMP#  LTEHP"1«  1>  = SEMICOLON; 


simple:  PROCCP.nB);  /**  OUTPUT  SIMPLL  CONJ/ASRT  **/ 

UCL  (P.  TP)  ptr*  no  fixed  BIN; 

IF  STYPC=CONJ«  THEN  /*  TRIPLET  CONJUNCTION  */ 

do: 

DO  L = 1 TO  f>->ttTRIPLETt 
TP  = P->CDE(L);  call  CAT  nB.  0)) 

DO  J=1  TO  TP->ljPTS; 

CURTXT  = KEYNAME(H0HE(NAME(TP->P0INTS( J) ) ) ) ||  COMMA! 

CALL  COW<NB,  0)1 

end; 

SUBSTRiTEMp.  LTEMP-1,  1)  = •>•) 
temp  = TEMp  ))•=•; 

TP  = P->FDe(L); 

call  CAT(TP->STR.TEXT  II  •)  S'i  NB.  0)1 
END; 

SUBSTRITEMP,  LTEMP*  1)  = Bll 

end: 

ELSE  /•  ASrT  */ 

DO;  TP  = P->ExPR(1)!  call  CAtITP->STR.TEXT«  NB,  0)1 
TP  = P->ExPR(2); 

CURTXT  = B1 1 I P->RELATI0NAL..  operator  I IRI  I I TP->STR  . TEXT  ; 

CALL  CONlNBtO) ; 

TP  = p->range.exp; 

IF  TP-irrjULL  THEN 

Do;  CURTXt  = * +-  • I I TP->STR.TEXT I ip->pcnt; 

CALL  CONINB«0) ; end; 

end; 

ENO  simple; 

END  WFORI^-PT: 
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CAT;  proc(TExt»  nb«  OPT);  /♦  concatenate  * Output  text  •/ 

/••  ir  OPT  = 0 check  total  length.  Then  cat. 

IF  OPT  = 1 output  last  kecoro,  then  cat. 

IF  OPT  = 2 initial  •/ 

ncL  text  char(*) . (nb.opt)  fixed  bin; 

CURTXT  r TEXT; 

con:  entrycnb,  opt);  /*  same  as  cat.  except  text  from  "CUrtxt"  •/ 
IF  opT=o  Then 

do; IF(LENGTH(TEmP) )=0  THEN  NB=0; 

IF(LLN6TH<TEnP) )+(LENGtH(CURTXt) )<70  then 
TEMP=TEmP  II  SUBSTRlBLANKS.l.NB)  II  CURTXT  I 
ELSE  OPT=i; 

END: 

IF  oi*T  =1  I opt=2  Then 
do:  if  lORDER  >0  THEN 

oo;  /**•  PRINT  ENTIRE  LINE  **/ 

PUT  FILE(SEORPt)  EOITIM. IOHDER. IRANK.SNAME.JTYPE.TEMP) 
ISKIP.C0Lli),F(4),C0L(7),F(‘f)  ,CUL(14)  .F  ( 4 ) ,COL  I 26)  , A , 

C0LI41) .A.COLISS) ,A) ; 
tNAME.STYPE=* • ; 

IORDEK. IRANK=0; 

ENO;  ELSE 

PUT  FILE  (SEORPt)  edit  (TEMP)  ( SK IP , COL ( 56 ) . A ) I 
IF  OPT  =2  then  TEMP=»';  ELSE  TEMP=CURTxT; 


ENO  I 

LTEMP=LENGTH(TEmP) I 
END  CAT; 

ENO  PR.SEO: 

END  INTSEQl 


CRPATHS:  PROC(ADJMAT.PATHMAT.N) I 
DEBUG  ***/ 

DCL  (ADJMAt.PAThHAt) (*,♦)  BIT(*)I 
PATHHAT=ADjMAT; 

DO  J=1  TO  n; 

OO  1=1  TO  N; 

IF  PAtHMAT(I.J)  then  PATHHAT (I .♦)=PATHMAT ( I,*) iPATHMATI J.*)  ; 

end; 

END ; 


End  CRPATHS; 


cycles:  p'^oc  < a,p,n,oict) j 

OCL  SEOERR  FILE  OUTPUT  PRINT  ENVCFUSUH 
OCL  IA.P)  (*,«)  BlT(*>; 

OCL  PRINT-LINE  CHAR(125)  VARYING; 

OCL  used  (N)  BIT(1)S 
OCL  UICT(*)  CHAR(  12  ) varying: 

OCL  <R00T,RLACHJ(N) .PATH(N+1) ) FIXED  BIN! 

OCL  PATf^>EXTENDEO  BlTdl: 

CO  ROOT=l  TO  N! 

DO  K=R00T  TO  N; 

re*chj(k)=root: 

USED(K)='0*Bj 

END: 


LEVEh=l! 

PATh(1)=ROOT« 

I=ROOT  ; 

00  WHIiE(LEVEL-i=0)  ; 

path_lxtendeo=' o'd; 

JMIN=REAChJ( I ) J 

00  JsJMIN  TO  N while  ( ( level->  = o > X-'PATH_EXTENDED  ) ; 
IF  A(I,j)XP{j,ROOT)a-’USED(J)  THEN  DOj 

path_extendeio='1*o; 

call  EXTEnD-PATH; 

IF  U=ROOT  THEN  OO i 

CALL  PRCYCLL (PATHtLCvEL  I J 

Call  backtrack; 

End; 

End; 

end; 

IF  -ipath-extended  then  Do; 

REACHJ; I )=RoOT  ; 
call  BACKTRACK} 

END; 

ENO; 

ENO; 

/♦  INTERNAL  subroutines  */ 

backtrack;  proC; 
uSEDd  > = *o*b; 

levcl=level-i  ; 

IF  LEVEL-i=o  then  I=PATH(LEVEL)  ; 

End  backtrack; 

exteno-Path:  proc« 
useo(J)='i*b; 

REACHJ(I)=j+lt 

LEVEL=LEVEL41; 

PATH(LEVEL)=J; 

i=j; 

End  exteno-path; 
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prcycle;  proC(path, level)  j 

/*•*  MOST  OF  THIS  PROCEDURE  HaS  BEEN  CHANGED  FROM  ADAM  RHIN'S 
THESIS  TO  simplify  THE  PRINTING  OF  CIRCULAR  DEFINITONS 
IN  THE  ERROR  REPORT  RB  10/76  •*•/ 

OCL  lA  FIXED! 

OCL  STST  CHar(12)  ExT  VARYING! 

OCL  PATh(*)  fixed  BIN! 

DCL  level  fixed  BIN! 

OCL  ERK_CNT  FIXED  GIN  EXT! 

print.line  = 'Error  (Circuular  definition):  * 

)I'ThE  following  group  of  items  in  test  • I)  »tst 
H'  are  circularly  DEFINED;  *! 

DO  N0DES=1  TO  LEVEL! 

PRINT-LINE  = PRINT_LINE  II  DICT(PATh(NODEs)  ) IMt  • ! 

END! 

IA=LENGTH(PRINT-LINE)  ! 

PR1NI_LINe  = SUBSTR(PR1NT_LINE,  1'.  lA-2)  ! 

PUT  file  (SEQERR)  edit  (pRINT.LlNE ) (SKIP. A)! 

End  prcyc-E! 

End  CYCLES! 


PRECEED;PROC(ADjmAT, order. N)  ! 

/•  rearrange  nodes  of  a direct  GRAPHIsPECIFIED  By  adjacency  matrix  •/ 

/*  ''AOJMAT".N  BY  N)  IN  ASCENDING  "RANK"  ORDER.  RESULTING  IN  N>LlEMENT*/ 
/•  vector  "ORDER".  */ 

OCL  ( AOUMATC*,*) . UNUSE(N).  T irilT('l'B).  F INlT('o'B)  ) DIT(l). 

(ORDER!*) ,N0DES(2)1N1T< (2)0) .NEw  INIT(2).0LD  InIT ( 1 )) FIXED  BIN) 


DCl  ( DEPtH(2.N).  K INIT(O)  ) FIXED  BIN! 

DCl  RANK(NR)  fixed  din  EXT  CTL) 

OCL  (I.J.L.lI.M)  fixed  bin  STATIC! 

/♦  aojnat-~adjacency  Matrix  defining  the  digraph,  •/ 

/♦  N TNE  number  OF  nodes  IN  THE  DIGRAPH.  */ 

/•ORDER the  vector  OF  NODES  IN  RANk  ORDER.  */ 

/•  Rank vector  of  ranks  of  nodes  in  digraph.  intuitively,  the  •/ 

/*  RANK  IS  the  max.  DEPTH  OF  A GIVEV  NODE  IN  THE  DIGRAPH  */ 

/•  FROM  ANT  ROOT.  EXT  BECAUSE  USED  IN  'GFLTRPT'  •/ 

/*  depth SET  OF  nodes  IN  A GIVEN  RANK(OLD  S NEW).  I.E..  "RANK  SET",*/ 

/*  NODES COUNTERS  FOR  « OF  NODES  IN  OLD  & NEW  RANK  SET(DEPTH),  */ 

/•  Old POINTER  TO  PREVIOUS  RANK  SET.  */ 

/*  NEW POINTER  TO  CURRENT  RANK  SET.  */ 

/•  UNUSE BIT  VECTOR  OF  NODES  NOT  IN  THE  CURRENT  RANK  SET,  •/ 


/*  ALLOCATE  RANK  ANo  INITIALIZE  RANK  OF  ALL  NODES  TO  0 */ 

MR=N! 

ALLOCATE  RANK! 

IF  N=1  then  DO!  ORDER(l) .RANK(1)=0!  RETURN!  END! 

RANK,  order  = 0! 

/•  SET  UP  DEPTH  0*  ♦/ 

DO  J=1  TO  N! 

/•  enter  Those  nodes  with  an  all-o  column  in  the  first  rank  set  •/ 
IF  AnY(AdjMAT(*.J) ) then  goto  OUT! 

M,  N0DES(0L0)=N0DES(0LD|+1;  DEPTH(OLO.M)=Ji 
out:  END! 
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IF  NODCS(OLO)<=0  THEN  GoTo  ERR;  /*  No  COL  HAS  AlL  0 ♦/ 

/*  WHICH  MC'ANS  T8AT  EVERYTHING  IS 
DEPEINOENT  Om  sO^.ETHInG  ELSE  •/ 

/•  OTHERWISE!  proceed  TO  FInD  KANK  SETS  OF  DEPTH  1 AtjD  ON  */ 

DO  L=1  TO  N-IJ  /*  rOR  EACH  RANK  SET  ("DEPTH")  */ 

/*  initialize  number  of  NODES  IN  NEXT  RANK  SET  TO  Ol 

flag  all  nodes  as  not  appearing  in  next  rank  .SET  initially  •/ 

NOnES(NEW)=Oi  UNUSE=TJ 

DO  1 = 1 TO  NODEStOLD);  1 1 =OEP I H 1 OLD . I ) ! /*  FOR  EACH  NODE  IN  THE 

previous  rank  set  */ 

DO  J=1  TO  Ni  /•  for  EACH  COLUI^N  (NODE)  CHECK  IF  IT  IS  A 

dependent  of  node  in  olo  rank  set  •/ 

/•  IF  NODF  Is  PEFENUEnT  of  current  node  in  OtO  RANK  SET 
(NODE  ll>  and  if  IT  IS  nCT  YET  IN  NiXT  <nEW)  RAwK  SET 
then  enter  it  AS  A MEMBER  OF  THE  NEXT  RANK  SET  */ 

IF  adjmat(II.j)  then  if  unuse(J(  then 
DO;  rank(J)=l!  unuse(j)=f;  /*  set  or  update  Rank  of  node 


AND  indicate  that  IT  IS  NEW  RAMK  SET*/ 
Hf  NOOES(NEW)=NOOES(NEW>^i;  DEPTH(nEw.M)=j; 

end; 

END; 

end: 

/•  IF  there  are  not  any  nodes  in  next  rank  set,  I.E.  there 

are  no  nodes  dependent  on  any  nodes  in  previous  rank  set, 

then  we  Are  done  because  every  node  has  Its  rank  ♦/ 

IF  nodes(new)<=o  then  Goto  reorder; 

/•  exchange  Old  and  new  rank  sets,  which  HaS  the  effect  of 
making  new  rank  set  the  OLU  one,  and  a new  "NEW"  rank  set 
WILL  BE  created  IN  NEXT  PASS  */ 

m=nEw;  (new=olDj  old=m; 

end: 


err; 

return;  /*cycles  exist*  error  Return  with  oroer=o  •/ 


reorder;  /♦  SORT  nodes  by  ascending  RANK  ORDER.  */ 

DO  I=W  to  L-i; 

DO  J=1  TO  n; 

IF  RANK(J)=I  Then  do:  K=K+i;  ORDER(K)rJ;  END! 

END; 

end; 

END  PRECEED; 


APPENDIX  B 

/•«•«•»*»*•«***••«*•««**«*•**»*•*«*«•**»***«*«**«/ 
/•  */ 

/•  NOPAL  test  specification  FOR  RAOlOSET  */ 

/•  •/ 

/*«••*•*•*•«*«•*«•«««**•*******«**«*»*«••»•»*«»**/ 

NOPAL  SPCCIFICATIO'J  RAOIOSETI 


/•  •/ 

/•  TEST  modules:  13  •/ 

/•  •/ 


TEST  H I 

/•  Null  stimuli  »/  1 

( 

/*  NULL  MEASU-l^MrNT  */  ] 

••  ■j 

LOGIC  $LOGICOOlO(l) : «1« 

« ( 

diagnosis  i‘: 

OPERATo'^  message; 

TYPE=«1* 

RESPONSES?; 

TEST  2; 

/•  null  STIMULI  */ 

MEASUREMENT  $'1.2(2); 

CONJUNCTION  IM_W0001 ($M_2) ! 

(<xj24.B*  xja^.o  = const_r(Mres  ohm  ))  i 

target;  mres; 

I 

ASSERTION  $M_W0002($M-2) : 

MRES  > 100 

source:  mres; 

logic  SLOGIC0010(2)  : 71,  1-12,  *3; 

FOLLOWING  DIAGNOSIS  ALREADY  DEFINED  BEFORE: 

DIAGNOSIS  i: 

OPERATO'^  message: 

TYPEsWl, 

RESPONSES?: 

I 

diagnosis  2: 

operator  message: 

AFFECTED  COMPONENTSsINPUT-SHORT , i 

\ typ£s«i*; 

DIAGNOSIS  3: 

operator  MESSAGE; 
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other  PARaMETERS= IMRES*  •OHmS’I* 
type=d« 

TEST  SYTEST0003I 

STIMULI  2(SYTEST0003) » 

CONJUNCTIO’J  SS_W0001  (2): 

(<J24_B.  GND>  r C0NST_S(27.5  VOLT  ))t 

MEASUREMENT  SM-SYTESTOOO ( SYTESTOOO3 » » 

CONJUNCTION  SM_WonOl(SM_SYTEST00O> : 

(<J22,  GNO>  = S1NE_0(V1  VOlT  ,F1  HZ  ,VaR1  SEc  )) 

target:  pit  VI 
source:  varu 

assertion  M_W0002(SM_SYTESTOOO) : 

IF  VAR1=60  then 

Fl  = 5*lE+06  +-  60 

ELSE 

Fl  = 5*1C-»06  ■*-  2.5 

source:  VARl,  FU 

LOGIC  $LOGIC0010(SYTEST0003) :•  *4.  nS,  *6: 

DIAGNOSIS  4: 

OPERATOR  message: 

TYPE=«5« 

TIME=  O.OOOOOE+OOSECt 
response=(VARi)  : 

diagnosis  5: 

operator  message: 

affected  C0MP0NLNTS  = FREQ_T0L(STD_5MHZ_FRE)  , 
other  PARAMETLRS=( 'FREQ* ) * 

TYPE=«6 J 

diagnosis  e>: 

operator  message: 

OTHER  PARAMETERS=(F1  , 'Hz'). 

TYPErDJ 

TEST  4i 

/*  Null  stimuli  •/ 

measurement  $M.4(4): 

assertion  $A1_W0001(SM-4)  : 

VI  = 0.26  ♦-  0.06 

source:  vh 

LOGIC  i.LOGicooiO(4) : *7*  i->a: 
diagnosis  7: 

OPCKTTOR  MESSAGE: 

OTHER  PARAMETtRS=( VI,  • vRMS*)* 


TCST  51  TMPC  « 

STIMULI  3(5)1 

conjunction  ss_woooi(3); 

(<J24.B.  GND>  = C0NST_S(27.5  VOLT  ))  i 

(<J16>  = SIGNAL_AM(2.001  Mh2  ,-95  00  ,0  S ,1  KHZ  ))i 

MEASUREMENT  $M_5t5)« 

conjunction  sm.woooiism.s) : 

(<XJ19.A.  6N0>  = S1NE_0(V1  VOlT  ••tS  SEC  )) 

target:  VII 

ASSERTION  $M_W0002(SM_5) : 

VI  <=  0,7 

source;  VII 

LOGIC  SLOGTCOOlOlS)  ; *9,  IHOl 

DIAGNOSIS  9; 

OPERATOR  message; 

other  PARAMETERS=( VI,  ‘VAC’), 
type=d; 

DIAGNOSIS  10: 

operator  message; 

affected  COMPONENTS=MIN_OUTPUTIAUDiO_10HW> , 
TYPE=«8I 

TEST  Gl 

STIMULI  $S_b(S)l 

CONJUNCTION  IS-WOOOl (SS_6) ; 

(<J2H.B,  GND>  = C0NST_S(27.5  VOLT  ))  « 

(<Jl6>  = SIGNAL_AM(2.001  Mh2  ,-95  OB  , 0 i ,1  KHZ  )|: 

MEASUREMENT  SM.GIG); 

CONJUNCTION  $M_W0001ISH_6) ; 

(<XJ19_Lt  GND>  = S1NE_D(V1  VOLT  ♦•,3  SEC  )) 
target:  VII 

ASSERTION  S/»l.W0  0 02(SM-6)  ; 

VI  <=  0.7 

source:  VII 

LOGIC  SLOGICOOXOIfe) ; ♦!!,  (ilZJ 
DIAGNOSIS  11: 

operator  message; 

OTHER  PARAMETERS=(V1,  • vAC»), 

TYPEsDS 

DIAGNOSIS  12: 

operator  message; 

affected  C0MP0NENTS=M1N_0UTPUT(AUD10_2W) , 

TYPE=«95 
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xesT  i; 

STIMULI  SS_7(7); 

CONJUNCTIOM  »S_W000HSS_7)  : 

I (<J2M_3.  GNO>  = COnST_S(27.5  VOLT  J)  « 

<<Jl6>  = SIGNAL_AM(2.001  MhZ  .“95  DB  .0  S .1  KHZ  ))j 

MEASUREMENT  JM.7(7)| 

conjunction  ANr_NAME<SM_7) ; 

(<XJ19_A.  GNO>  = SINE_0<V1  VOLT  .*.3  SEC  )) 

target:  VU 

ASSERTION  S.W_W0002(SM_7)  ; 

VI  >=  2,33 

source:  vi« 

I LOGIC  $LOGicooio<7) : *13.  ♦1'+,  ms* 

DIAGNOSIS  13: 

operator  message:- 

TYPE=ttlO.  ' 

time=  O.OOOOOE-^OOSE'c, 
responses?: 

diagnosis  14: 

operator  message: 

I other  pAKAnETERS=(Vl,  • vAC»), 

TYPEsD; 

I I 

1 DIAGNOSIS  15: 

j operator  message:  i 

I affected  COMPONENTS=MAX_OUTPUT<AUDIO_10MM> , I 

, j other  PARAMETERS=( • 10  Hw’».  i 

1 type=«ii;  j 

I test  8S 

I STIMULI  SS_8(6): 

I conjunction  SS_UI0001  (SS_8)  : 

' (<J24_B,  GNO>  = C0NST.s(27.5  VOLT  ))  i 

! (<Jl6>  = SlGNAL_Art(2.001  Mh2  ,-95  DB  .0  * .1  KHZ  )); 

• 

MEASUREMENT  $M_8(e): 

conjunction  SM_W0001(SM_8) : 

(<XJ19-L.  GN0>  = S1NE_d(V1  VOlT  .*.3  SEC  )) 

tahget:  vi« 

ASSERTION  A1($H_3): 

LOG  = 20*LOG10(V1/3.981E-06) 

target:  LOG  '' 

j source:  vi: 

ASSERTION  A2($M_8): 

VI  >=  55.2 

source;  vh 

LOGIC  fLOClCOOlO(8»  : •16.  *17,  |-.16« 


DIAGNOSIS  IS: 
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opcratoR  message : 

Typ£r#i2. 

TIrtt=  O.OOOOOL+OOSEC, 

ACSPOMSEr?: 

OlA«NOStS  17: 

OPERAToB  MESSAGE: 

OTHER  PARAHETERS=  ( v/i , • vAC*t  LOG.  •d6*). 
TYPE=05 

OIAOMOSIS  10: 

OPERATOR  MESSAGE: 

affected  COMPONEntS=MAX-0UTPUT(RUDIO_2MI , 
other  PARaMETERS= ( • 2W' I , 

TTPE=#ll : 

test  9! 

stimuli  $S_9(9): 

. coAjjUHCTioM  iS-Wonoi ; . 

GMO>  = (fDNST_ST27.5  VOLT  ))  i 

(<Jis>  ---  signal_aM(Fi  nnz  ,-95  os  .0  % .i  khz  i) 

SOURCE : 'fi : 

• ASSERTION  tS-W0002(iS_9) : 

FI  = 1MT(  (‘♦♦(KaNDOM+KJ-2J»i000J/100O0  + 1£-09 

target:  FI 
source:  Ki 

assertion  ASSEftTiow*2<^S_9): 

F2  = Fl-O.OOl 

target:  r2 
source:  fi: 

assertion  L00P<H_9): 

K = LOOP_Ortl,7.H 

target:  K; 

measurement  ^.9(9); 

COMJUNCT I ON  #M-l/OOOl  ( 1 : 

(<XJ19-L.  GWd>  = STNE>0(V2(RI .••0  SEC  »> 
target:  V2(K) 

SOURCE:  ic: 

assertion  iM-W0002(SM-9> : 

LOG  = 2O«LO6l0 (V2(KI/3.98lt-06) 

TARGET:  log 
SOURCE:  K. 

logic  SLOGICOOl 0 (9  I : *19.  *20.  #21; 

OlACNOSrS  19: 

operator  MESSAGE: 

OTHER  PARAMETERSs <F2I . 

TYPE=<Hf. 

TIME:  0. OOOOOe+OOSEC . 

RESPONSE =7. ' 

DIAGNOSIS  2D: 

opcratoR  message:' 

OTHER  PARAMiTfRG-«Fl . • MHZ' » . 


TrpE=0: 

•OIA6NOSTS  21: 

operator  MESSAGE; 

OTHER  PARA«ETeRS=( V2(K> . • MAC',  LOG.  » 08*). 
TYpErO; 

test  \0i  ' 

/»  NOLL  STIHULI  */ 

MEASOREMCJlT  ^^.10(10): 

ASSERTION  Sn-MOOOKiM-lu) : 

Ratio  = kax(V2)/imin(  V2i 
target:  ratio 
source;  v2; 

assertion  $M_Wooa2t|R_io) ; 

RATIO  <-  4 

source:  ratio; 

LOGIC  iLOGICOOiOdO)  ; *22,  |-i23; 

DIAGNOSIS  22: 

OPERATOR  message: 

other  PAPaMETERS=«RAtIO) , 

TYpErO; 

diagnosis  2%: 

operator  message: 

affected  CONPONElJTS=GAlN_fiAriO, 

TYPE  rill  9; 

test  11: 

STIMOcl  6{ 11 ) ; 

CONJUNCTION  4S-W0001(6): 

t<J24„B,  GN0>  = C0NST_S«27.S  VOLT  II  « 

(<Jl6>  = Sl6NAL_AM(2G.a02  MH2  ,^15  00  .0  X •!  KHZ 

MfASUREMENT  iM-iKlH! 

conjunction  4.n_Noooi(#fA_ii) ; 

(<XJ19,A«  = SI/VE_0(V.l  VOLT  ,*,Q  SEC  )l 

target:  VI ; 

ASSERTION  AH  <n-in: 

VI  >=  2.2 

source:  VI • 

assertion  ♦2i|tt-.iii; 

VI  <=  2.8 

source:  VI! 

LOGTC  iLOGlCOOIOdll  ; *24,  *25,  |-»265 

diagnosis  2‘!: 

operator  message : 

TYPE=#15, 

T1ME=  O.OOOOOE+flOSEC, 

RCSPONSEr?! 
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DIAGNOSIS  25: 

operator  message: 

other  PARAMETERS=(V1,  • vAC»)f 
TTPEsO: 

DIAGNOSIS  2f>: 

OPERATOR  message; 

TYPE=«I7« 

TEST  12: 

stimuli  duhmy.name (12) : 

CONJUNCTIOM  SS-WOOOl (DUMMY.NAME) : 

GND>  = COnST_S(27.5  VOLT  ))  S 
(<J16>  = SIGNAL_AM(25, 002  MH2  ,+13  D0  ,0  % •!  KHZ  ))l 

measurement  $M_12<12): 

CONJUNCTIOM  $M_W0001(*M_12) : 

(<XJ19>A»  GN0>  = UlSTORTION(Pl  * *2  KHZ  )) 
target;  pi: 

assertion  $M_W000.2(SHrl2)  : ' 

PI  <=  3 

source;  pu 

LOGIC  $LOGICOOlO(12)  ; *27,  |•’28: 

diagnosis  27;  I 

operator  message;  j 

OTHER  PARAMETERS=(P1,  «S»),  . ij 

TYPE=0:  J 

DIAGNOSIS  26:  I 

[ OPERATOR  message;  I 

t affected  CoMPONEnTS=DISToRT(AUOIO_10MW),  J 

f OTHER  PARaMETERS=( *10  MW*,  1.0),  * 

I TYPE  = «16:  ;| 

' TEST  13:  I 

stimuli  »S_13(13):  j 

! CONJUNCTION  $S>W0001(SS_13)  : i 

I (<J24.3,  6N0>  = C0NST_s(27.5  VOLT  ))  S !!] 

j (<J1G>  = SIGNAL_AN(25,002  MHZ  ,+13  DB  ,0  S *1  KHZ  )))  ^ 

{ MEASUREMENT  $M.13«13):  j 

j CONJUNCTION  IM-WOOOl  (SM_13)  : ;| 

. (<XJ19-L*  GND>  = UISTORTIOn(P1  « *1  KHZ  ))  j 

target;  pi:  1 

! i ' 

ASSERTION  IM-W0002($n-13) ; 

\ PI  <=  5 ■ j 

, source;  pi:  I 

I logic  SLOGTCOOlOdS)  : *29,  MSo:  ll 

• DIAGNOSIS  29:  ^ 

OPERATOR  MESSAGE:  i 


I, 

I 
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O-rMeU,  » C iPA,"  ♦•/<>') 

TYPE=^«  •*  U 

DIAGNOSIS  30: 

operator  message: 

AFFECTED  C0MP0NENTS=0IST0RT(AU0I0_2W) . 
OTHER  PARAMETERS=( ' 2U*i  5.0) • 

TYPEsBia: 

/*«««»********••*•»*•«***»»***•«***»*»*****««*«**/ 
/*  •/ 

/*  MESSAGES  */ 

/*  */ 

/««»»*«»»*4i«««*»»*»«*«»***»*****«»»S**«»**««**»*»/ 


message  an: 

TEXT='  R/T  DC  INPUT  SHoRTED  J2R-B/J24-C 
AN/GRC-IOG  defective 

check  printouts  for  defects. 

PRESS  STOP,  t, 

MESSAGE  D:  AL I AS=DISPLAY . 

TEXT='  (STETS):  (P)  M 


message  ttS: 

TEXT='IF  A 12  minute:  UUT  WARMUP  IS  DESIRED.  KEY  IN  7205 

otherwise  key  in  go. 

PRESS  YES,  »5 


MESSAGE  Rg: 

text='TExt  omitted.* 

message  we: 

tlxt=*text  omitted,* 

message  wg: 

text=*text  omitted,* 


MESSAGE  «10: 

text=*text  omitted.* 

MESSAGE  «ll: 

text=*text  omitted.' 


MESSAGE  «12: 

TCXT=*TEXT  omitted,* 


MESSAGE  N14: 

TEXT='TEXT  OMITTED,* 


message  5113: 

text=*text  omitted.* 


message  wis:  ii 

TEXT=*TEXT  OMITTED. *5  ij 

■i 

MESSAGE  5(17:  jj 

Tf.XT=*TEXT  OMITTED,*;  ii 


\ 


MESSAGE  5518: 

texts*  (PI)  AUDIO  DISTORTION  GREATER  THAN  (P2)  PERCENT.  *5 
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message  i:  ALIAS=«1« 

TEXT='  initial  UUT  X ATE  HOOKUP  MESSAGE#  FULL  TEXT  OMITTED,  *1 

/*m************t»***^  *******************  *■***•****/ 

/*  */ 

/*  UUT  cohponemts/failures  •/ 

/•  */ 

/************************************************/ 


! 


I 

! 

! 


i 

i 


I 

t 

I 

! 

t 

i 

\ 

j 

i 


r 


» 

\ 

t 


COMP_FAIL  l:  INPJT-SHORTI 

C0MP_FAIL  2:  STD>5HHZ_FRE,  FAILURE  FUigCT  10N=FREQ_T0l * InDEX  = 1 .t>tWrtecsvO); 
COMP.FAIL  3:  STD_5MH2_FRE.  failure  FUnCTION=AMPL-TOL»  lNDEX=2,PW»taLTj{i); 
COMP.FAIl  4:  AUDlO-lOMWi  FAILURE  FUNCtION  = MIN_OUTPUT  . 1nDEX  = 3 .F«bT«l'T^0 
COMP.FAIL  5:  AUDIO-IOMW,  FAILURE  FUNCTlO(\i=MAX_OUTPUT # I NDEX  = 5 

i 

COMP.FAIL  6S  AUOIO-lOMU,  FAILURE  FUNCt10n=REF_VOLTi  PR0TECT=(1,  11)» 
C0MMENTS=*  distortion  ref#  VOlT.  test.'; 

COMP.FAIL  11:  GaIN-RATIOi  PROTECT=(lt  2i  3#  4.  5t  8#  9); 

COMP.FAIL  7:  AUOIO-IOMW,  FAILURE  FUNCT ION=01 STORT , PR0TECT=(1,  6); 

COMP.FAIL  a:  AUaiO-2W.  FAILURE  FUNCT IoN=MIN.OUTPUT 1 INDEX=4,  PR0TECT=« 

COMP.FAIL  9:  AUDI0-2W,  FAILURE  FUNCTlCN=MAX_OUTPUT # INDEX=6,  PROTEcT=fl 

COMP.FAIL  10:  AUOI0.2W,  FAILURE  FUNCTlONrDISTORT « PROTEcT=(l»  11); 


/************************************************/ 
/*  */ 

/*  UUT  connection  POINTS  */ 

/*  */ 

/************************************************/ 


UUT.POINT  : XJ24.C.  ALIAS=GND,  CoNNECTOR= ( MULT I PlE , C); 

UUT.POINT  : J24_B,  ALI AS=X J24_B . CONNECTORr ( MULTIPLE » B)# 

LIMIT=(VOlT.  3.50000E+01,  2.00000E+01,  GNp), 

COMHEflTSs'  MULTIPLE  CONNECTOR'S 

UUT_POINT  ; J22S 

UUT.POINT  3;  J16«  ALIAS=XJ16,  CONnECTOR= ( CO AX » )# 

LIMIT=(  J»/0LT»  1.00000E  + 02t  0#00000E  + 00«  6N0)' 
COMMENTS='  coaxial  CABLE'; 

UUT.POINT  2;  j24.C,  ALIAS=GND,  COnNEcTOR= ( MULTIPLE  * OS 

USIT_P0INT  40:  J19^A,  ALIAS=XJ19_A.  CONNECTORrSMULTIPLE#  A), 
LIMlT=(VOLTf  5.00000E+00,  O.OOOOOE+OO,  GN0)8 

UUT.POINT  SOS  J19-8#  ALIAS=GND,  COnNECTOR= ( MULTIPLE t B)S 

US'T.POINT  ; J19_L,  ALIAS=XJlg_L#  CONNECTOKr ( MULTI PLE • L), 

LTMITr(,  7,OOOOOE+Ol#  O.OOOOOE+OOt  GNDSS 
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/•  ATe  functions  */ 

/*  ’ */ 
****•**•****■  ****■*****■***■*■******************•***/ 


FUNCTIOM  20 : CONST.R,  function  TYPE=f1»  «PINS=  2« 

PaRAM_01=(X.  T,  LIMIT=(0HP*.  1.00000E+03»  l.OOOOOE+00) ) . 
value  RETURNED=tTRuE/FALsE» I 

function  lOJ  CONST_S.  FUNCTION  TYPr=St  «PINS=  2. 

PARAM_01=(X*  S.  L1MIT=(V0LT.  6.00000E+0lt  0. OOOOOE+00) ) f 

VALUE  RETURNtO='  CONSTANT  VOLT.'; 

FUNCTION  3n:  SINEAD,  ALI AS=SInE_DElAY , FUNCTION  TYPE=M,  «PinS=  2. 
PaRaM_U1  = (X,  T,  LIMIT=(V0LT.  l.OOOOOE  + Ol.  >1.1JOOOOE  + Ol)  ) . 

■ PARA«_02=(Yi  Ti  LII*1IT=(NHZi  i.OOOOOE  + Ol»  0.00000E+00>  >» 
PARAM_03=(2.  S.  L1MIT=(SEC.  l.OoOOOE+75«  -1 . OOOOOE+75 1 > . 
C0NMENTS='APNPU.  . FREQ.,  TIME  DEi.YD»; 

function  no:  FREO_TOLi  FUNCTION  TYpE=F. 

PAnAM_01  = (COMPOIMENT.  .S)  « 

FUNCTION  120:  AMPL_T0L.  FUNCTION  'TYpE=Fi 

param_oi=(Component«  s);  , 

FUNCTION  130 : MlN.OUTPUT.  FUNCTION  TYPE=F* 

PARAM_01=iCOMPONENT.  S)5 

function  140:  MAX_OUTPUT«  FUNCTION  TYPE=F. 
paRam_oi=(Component.  s); 

FUNCTION  : DISTORT.  FUNCTION  TYPE=F. 

PARAM_01=(COMPONENT.  S)5 

FUNCTION  150:  REF.VOLT.  FUNCTION  TYpE=Fi 
PARAM_01=(COMPONENT.  S)5 

FUNCTION  HO:  SAM.  AlI AS=SIGNAl_AM.  FUNCTION  TYPErS.  «PINS=  1. 

PARAM_01  = (X.  S.  LIMIT=(MhZi  i.OoOOOE  + 02.  I.OOOOOE-Oi)  ) . 
PARAM_02=(Y,  S,  LIMIT=(DB.  -l.OOOOOE+01.  “1.5CUO0E+02) ) . 
PARAM_03=(Z.  S.  LIMIT=(%,  l.oOOOOE+75.  -1 . OOOOOE+75 ) ) . 
PARAM_04  = (W,  S.  L1MIT=(KHZ.  1.50000E  + 01,  1 . 0 0 o 0 OE- 0 1 ) ) ; 

function  5o:  logic,  function  type=e« 

PAHAM_01=rX.  S). 

VALUE  RET0RNED=*L0G1P (X) • t 

function  go:  INT,  ALlASnNTEGER,  FUNCTION  TYPE=E. 

PARAM_01=(X.  S». 

VALUE  RETURNE0=«FL00R  OF  X*.  C0MMENTS='  LARGEST  INTEGER  <=  X*; 

FUNCTION  70 : RAND.  ALI AS=RANDOM.  FUNCTION  TYPE=E, 
value  RETURNE0=»RAN?0M  NUMBER*. • 

FUNCTION  flo:  MAX,  AL I AS=MaX 1 MUM . FUNCTION  TYPE=E, 

VALUE  REIURNED=.MAXUi,X2.  XN)*.  C0MMENTS=*  N>  = i;  X A VECTOR.’ 

FUNCTION  90;  MlN,  ALIAS=MINIMUM.  FUNCTION  TYPE=E. 

value  HETORNLDs*  MINtXl.X2.XN) •; 

function  : OIST.  AlIAS=0iST0RT10n.  FUNCTION  TYPE=M|.  *PINS=  2. 

PARAM_01  = (X.  T.  LIMn=(*.  1.00000t^7b.  -1 , OOOOOE+75  ) ) , 
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PARAIi_02=(  Y«  S.  LiniT  = (KHZ,  i . 00000E4-02  f O.OOOOOE-fOO)  1 1 
VALUE  RETuRNtO=»TRUE/FALSE' I 

FUNCTION  : LOOP-OF.  FUNCTION  TYPE=Ci 

PARAM_Ol=( INIT.  Sit 
PAKAn_02=(BOUNDt  Sit 

PARAH.03=(INCRt  Sit  COMMENTS= • REPEAT  FOR  KslNII  TO  BOUND  BY  INCR' 

/««»**«*•*«*«••»»••*««««««*•*«*««#*#«**#»***•*#**/ 

/•  */ 

/*  ATE  connection  POINTS  •/ 

/•  •/ 

/««:*»«*4i*««*«***»*»4l*********#»****t>**^******«'**4'/ 


ATE_P0INT  i:  ATE_Xj24B,  UUT_POINTS=  < H 

ATE_POlNT  ! ATE_Xj24_Ct  UUT_POir4TS=  ( J24_C  i J 


ATE.POINT  ' so;  ATEPTUSO.  UUT_PO INTS= ( J16 t J22il 
END  RADIOSET  « ' 
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INTRA  rODULE  SEOULfjClNG  2 
ANALYSIS  OF  THE  ADJACENCY  MATRIX 
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Culver  City,  CA  90230 

Mr.  Andrew  Mills 
Hewlett-Packard 
974  East  Arques 
Sunnyvale,  CA  94806 

Mr.  M.  T.  Schloesser 
Lockheed-Cal i forni a Company 
Div.  of  Lockheed  Aircraft  Corp. 
Bldg  167 

Burbank,  CA  91520 
Analytics 

2500  Maryland  Road 
ATTN:  Mr.  S.  Leibholtz 
ATTN:  Mr.  R.  Brachman 
Willow  Grove,  PA  19090 
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